Сабақтың ортасы
|
Тапсырма №1. Кіріктірілген циклдердің көмегімен деректерді n=5 жағдайы үшін тіктөртбұрыш түрінде экранға шығар.
Тапсырманы орындауға ұсыныс: шарт тексеру операторымен циклдарды кірістіріп пайдаланған тиімді. i=j=0 for i in range(1,6):
for j in range(1,6):
print(i*j,end="\t") print()
Тапсырма №2. 1 ден 15 ке дейінгі барлық бүтін сандардың квадраттарының қосындысын табыңдар
. program esep;
var i,x,s:integer;
begin
s:=0;
for i:=1 to 15 do
begin
x:=sqr(i);
s:=s+x;
end;
write(s);
end.
Тапсырма № 3. Натурал сан берілген. Ол сандардың қосындысы оннан кем емес екені рас па?
program esep;
var i,a,j,s:integer;
begin s:=0;
read (j);
for i:=1 to j do
s:=s+i; if s>=10 then
write ('10-нан кем емес')else
write ('10-нан кем');
write(s);
end.
Тапсырма №4. Натурал сан берілген. Оның цифр санының тақ екендігі рас па?
program esep;
var a,i:integer;
begin read(a);
for i:=1 to a do
if a mod 2 = 1 then
writeln('тақ') else writeln('тақ емес');
end
|
Берілген тапсырманы орындайды.
Қосымша деректер
жинақтайды.
Нәтижеге бағытталған білім алады.
Берілген тапсырманы орындайды.
|
|
|
