Жұмыстың мақсаты: Delphi7 ортасында цикл операторларын оқып үйрену, олардың бір-бірінен айырмашылықтары мен ерекшеліктерін айыра білу. While, Repeat, For циклдарын программа жасақтауда оларды дұрыс қолдана білуге машықтандыру, студенттердің білік-дағдыларын жетілдіру.
Тапсырма:
4.1-ден n-ге дейінгі сандардың квадраттарының қосындысын анықтаңыз.
Программа коды:
{$APPTYPE CONSOLE}
uses
SysUtils;
var n,i,s:integer;
begin
write('n=');
read(n);
s:=0;
for i:=1 to n do
s:=s+i*i;
write('S=',s);
end.
Бақылау сұрақтарына жауап:
Repeat қызметші сөзінің атқаратын қызметі қандай?
REPEAT қайталау операторы WHILE операторына ұқсас, айымашылығы – қайталану шарты цикл соңында тексерніледі, сондықтан ол кем дегенде бір рет орындалатын болады. Екінші өзгешелігі – цикл тұлғасы шарт жалған болғанда қайталанып, ол ақиқат болған кезде циклді орындау доғарылады..Бұл оператор . REPEAT ( қайталау) және UNTIL ( дейін, шейін ) түйіді сөздерін пайдаланады.
Достарыңызбен бөлісу: |
