Зертханалыќ жўмыс



жүктеу 1,02 Mb.
бет2/5
Дата20.05.2018
өлшемі1,02 Mb.
#15166
1   2   3   4   5

Теориялық бөлім

WRITE айнымалының мәнiн, өрнектiң мәнiн, текстi экранға шығарады.

Жазылу форматы: write(ln) (<параметр>);

Жазылу түрлерi:



writeln (өрнек); – өрнектiң мәнiн экранға шығарады. writeln (sqr(25));

writeln(x); – x айнымалының мәнi шығады.

writeln (‘текст’) – апострофтың iшiндегi текст шығады.

writeln ( өрнек, ’текст’, айнымалылар);

writeln; – бос жол шығарады.

read(ln) сандық мәндердi, символдарды, жолдарды клавиатурадан енгiзедi.

Жазылу форматы: read(ln)(айнымалылар тiзiмi);

Жазылу түрлерi:



readln(x) – x-тiң мәнi енгiзiледi.

readln(a,b) – a,b мәндерi бос орынмен ажыратылып енгiзiледi.

readln- енгізу клавишасы басылғанын күтеді.

Read процедурасы орындалғанда, айнымалының мәнiн енгiзу үшiн бағдарлама жұмысында кiдiрiс болады. Айнымалының мәнiн оқушы клавиатурадан енгiзедi. Егер read процедурасында айнымалылар тiзiмi көрсетiлсе, онда тiзiмдегi айнымалылардың мәндерi клавиатурадан бос орынмен ажыратылып енгiзiледi. Әрбiр read процедурасынан соң Enter клавишасы басылады.
1 жаттығу. Қадыр Мырзалиевтің «Ана тілі» тақпағының бір шумағын экранға шығару.

1. Бағдарлама тексін теріңіз

program text;

uses crt;

begin


clrscr;

Writeln; Writeln(‘Ана тілі’); Writeln;

Writeln(‘Ана тілің арың бұл,’);

Writeln(‘Ұятың боп тұр бетте.);

Writeln(‘Өзге тілдің бәрін біл,’);

Writeln(‘Өз тіліңді құрметте’); Writeln;

Writeln(‘Қ.Мырзалиев‘); Writeln;

readln;


end.

Бағдарламаны орындап, нәтижесін көріңіз. Экранда орналасуына назар аударыңыз



2. Мына жолдарға өзгерістер енгізіңіздер

Writeln (‘Ана тілі’:20);

Writeln (‘К. Мырзалиев’:30);

Бағдарламаны орындап, нәтижесін көріңіз. Қандай айырмашылық бар? 20 және 30 цифрларын өзгертіңіз. Нәтижесіне түсініктеме беріңіз.



2 жаттығу. Жаңа терезеде мына жолдарды теріңіз

uses crt;

var x,y,a,b: byte;

begin


clrscr; {1}

readln(x); {2}

y:=10; {3}

writeln(x); {4}

writeln(x+y); {5}

readln;


end.

Орындап нәтижені қараңыз да, дәптерге жазып алыңыз



3. Мына {4} және {5} жолдарды өзгертіңіз:

Writeln (‘х=’, х);

Writeln (‘у+х=’, х+у);

Орындап нәтижені қараңыз. Қандай өзгеріс бар? Қорытынды жасаңыз.



4. Мына өзгерістерді енгізіңіз. {3} жолдан соң мына жолды теріңіз:

а:= х*у; {3а}

{4}, {5}жолдарды өзгертіңіз: writeln (x,’*’, y, ‘=’ , a); {4}

Writeln (‘x=’, x:10, ‘y=’;10, ‘a=’,:10, a:10); {5}

Орындап нәтижені қараңыз. Қандай өзгеріс бар? Қорытынды жасаңыз. {5}жолдағы : белгісі қандай қызмет атқарады?
3 жаттығу. Жаңа терезеде жазыңыз:

uses crt;

var x,y,a,b:real; s:string;

begin


clrscr; {1}

x:=100; y:=3; {2}

а:=х/у;

writeln (‘a=’;a); {3}



writeln (‘a=’:10);

writeln (‘a=’:10:5); {4}

writeln(‘a=’:10:2);

writeln(‘a=’:10:0);

writeln(‘a=’:0:5); {5}

writeln(‘a=’:0:2); {6}

writeln(‘a=’:0:0);

readln;


end.

Бағдарламаны орындап, нәтижесін қараңыз. Экранға шығудың қандай айырмашылықтары бар? Санның бөлшек бөлігіндегі цифрлар санының өзгеруі неге байланысты?



4 жаттығу. Жаңа терезеде жазыңыз:

uses crt;

var x,y,a,b:real; s:string;

begin


clrscr; {1}

readln(x,y); а:=х/у; {2}

writeln (‘x=’;x); {3}

writeln (‘y=’,y);

writeln (‘a=’,a); {4}

readln; end.

Бағдарламаны орындаңыз. Экранға курсор шығады. Бос орынмен ажыратып екі сан енгізіңіз. Экранға шыққан х пен у-тің мәндері енгізілген сандарға ие болды ма?

Бағдарламаны бірнеше рет орындап, нәтижесін жазып алыңыз.



Сұрақ: Readln қандай қызмет атқарады? Ол орындалғанда экран қандай түрде болады? Курсордың орналасуы қалай?

5 жаттығу. Диалогтық программа құру

uses crt;

var s, a, b:string; x,y,z:byte;

begin


clrscr; {1}

Writeln(‘Сәлем!’);

Write(‘Атың кім?’); Readln(s); Writeln;

Write(‘Екі сан енгіз ’); readln(x,y);

Write(‘Бір сан енгіз ’); readln(z); Writeln;

Writeln(‘Үш санның қосындысы = ’, x+y+z); Writeln;

Writeln(‘Сау бол! ’,s); Writeln;

readln; end.



Cұрақ: Write және Writeln айырмашылығы неде?
Өрнектерді бағдарламалау тілінде жазып есептеңіз.

1. p = Жауабы: 402.1339

2. k=- Жауабы: 62.10672

3. c= Жауабы: 3472.599

4. d= Жауабы: 0.0406535
Пайдаланылатын әдебиет: [4], 5-24 беттер;
4 зертханалық жұмыс Алгоритм ұғымын формальдандыру.

Тармақты алгоритмдер. Шарттық оператор
жүктеу 1,02 Mb.

Достарыңызбен бөлісу:
1   2   3   4   5




©g.engime.org 2024
әкімшілігінің қараңыз

    Басты бет
рсетілетін қызмет
халықаралық қаржы
Астана халықаралық
қызмет регламенті
бекіту туралы
туралы ережені
орталығы туралы
субсидиялау мемлекеттік
кеңес туралы
ніндегі кеңес
орталығын басқару
қаржы орталығын
қаржы орталығы
құрамын бекіту
неркәсіптік кешен
міндетті құпия
болуына ерікті
тексерілу мемлекеттік
медициналық тексерілу
құпия медициналық
ерікті анонимді
Бастауыш тәлім
қатысуға жолдамалар
қызметшілері арасындағы
академиялық демалыс
алушыларға академиялық
білім алушыларға
ұйымдарында білім
туралы хабарландыру
конкурс туралы
мемлекеттік қызметшілері
мемлекеттік әкімшілік
органдардың мемлекеттік
мемлекеттік органдардың
барлық мемлекеттік
арналған барлық
орналасуға арналған
лауазымына орналасуға
әкімшілік лауазымына
инфекцияның болуына
жәрдемдесудің белсенді
шараларына қатысуға
саласындағы дайындаушы
ленген қосылған
шегінде бюджетке
салығы шегінде
есептелген қосылған
ұйымдарға есептелген
дайындаушы ұйымдарға
кешен саласындағы
сомасын субсидиялау