Вариант 1.
1. Написать алгоритм по составленной программе.
Program zadacha;
var i, S: integer;
begin
S=1;
for i:=1 to 10 do
begin
if i>5
then S:=S+i*453
else S=S;
write(S) ;
end;
еnd.
2. Используя блок-схему написать алгоритм.

3. Найти сумму чисел на промежутке от -10 до 100, удвоив четные слагаемые.
Вариант 2.
1. Построить блок- схему по предложенной программе.
Program zadacha;
var P, i, S: integer;
Begin
S:=0;
P:=1;
For i:=1 To 150 do
begin
If I mod 5=0 then
S:=S+i;
P:=P*I ;
end;
Write(‘S=’, S, ‘P=’, P) ;
еnd.
2. Используя блок-схему написать алгоритм.
3. Найти количество нечетных чисел на промежутке от 10 до 100.
Весь материал - в документе.




















Контрольная работа по информатике "Циклы" (38 КB)

