Mavzu: 1 ­­– dars. Masalalarni kompyuterda yechish bosqichlari Darsning maqsadi

Takrorlanishlar soni=N2-N1+1

a)For k:=trunk(23/5)downto trunc(1/2) do m:=1991; takrorlash operatorida trunc(23/5)-trunc(1/2)+1=trunc(4.6)-trunc(0.5)+1=4-0+1=5 ta

d) For J:=2 downto 19 do m:=1950; takrorlash operatorida 2-19+1=-16, ya’ni biror marta ham takrorlanmaydi.

f) For i:=abs(-25) to 25 do s:=s+i*i; takrorlash operatorida 25-abs(-25)+1=25-25+1=1 ta.

IV.Mavzuni mustahkamlash va yakunlash: O‘quvchilarga darslikdagi savollar orqali murojaat etiladi va 75 betdagi 1, 2-mashqlar daftarda, 3-mashq esa kompyuterda yechish asosida mavzu mustahkamlanadi.

M-3.

S=10+12+14+…+50 yig`indisini hisoblash dasturini tuzing.

Blok sxemasi. Dasturi

Var

K, S: integer;

Begin

S:=0; for k:=10 to 50 do if k mod 2=0

Then S:=S+K;

Writeln(‘S=’, S);

Readln;

End.

1.