Компьютермен жұмыс
№1. 1- ден 100-ге дейінгі сандарды экранға шығаратын программа құрыңдар.
Program san;
Var i: integer;
Begin
Wtiteln (‘ 1- den 100- ge dein butin san’);
Writeln;
For i:=1 to 100 do
Write (i:4);
End.
№2. 30-дан 10-ға дейінгі барлық жұп сандарды экранға шығаратын программа құрыңдар.
Program jup;
Var i: integer;
Begin
Writeln (’30-dan 10-ga deingi jup san’);
For i:=30 downto 10 do
If I mod 2=0 then
Writeln (i);
End.
№3. 1- ден 100 –ге дейінгі тақ сандардың және жұп сандардың қосындыларын табудың программасын құру керек.
Program tak and jup
Var I, s, s1: integer;
S:=0; S1:= 0;
For i:=1 to 100 do
Begin
If I mod 2 = 0 then s:=s+I else s1:=s1+I;
Writeln (‘ s=’, s, ‘ , ‘ , ‘s1= ‘, s1);
End;
End.
№4. 5- тен 1-ге дейінгі сандардың қосындысын есептеу керек.
Program kosindi;
Var I, s:integer;
Begin
S:=0;
For i:=5 downto 1 do
S:=S+I;
Writeln (‘s = ‘, s);
End.
Сабақты бекіту сұрақтары
Цикл дегеніміз не?
Циклдің алгоритмнің неше түрі бар?
Программаның нәтижесін қалай көреміз?
WHILE операторының жазылу үлгісін көрсет?
WHILE операторының орындалу тәртібі қалай?
REPEAT операторының жазылу үлгісін көрсет?
REPEAT және WHILE операторының айырмашылығы неде?
* FOR операторының жазылу үлгісін көрсет?
Үйге тапсырма: Паскаль тілінің параметрлі қайталау операторы - FOR
Пән аты: Информатика
Класы: 9 «А», 9 «Б», 9 «В», 9 «Г»
Сабақтың тақырыбы: Паскаль программалау тілінен өткенді қайталау.
Сабақтың мақсаты:
Білімділігі: Оқушылардың Паскаль программалау тілінен алған білімдерін тексеру;
Достарыңызбен бөлісу: |