среда, 17 марта 2021 г.

циклы переписать в тетрадь и выучить

 ТЕСТ по теме ЦИКЛЫ

 

Таблица оператора цикла  for

1

Подсчитать сумму чисел и вывести только результат

for i:=1 to n do S:=S+i;

write(‘ S=’ ,S);

2

Подсчитать сумму чисел и выводить все промежуточные результаты

for i:=1 to n do

begin S:=S+i;write(‘ S=’ ,S); end;

3

Подсчитать произведение чисел и вывести все промежуточные результат

for i:=1 to n do begin S:=S*i;

write(‘ S=’ ,S); end;

4

Подсчитать произведение чисел и вывести только результат

for i:=1 to n do S:=S*i;

write(‘ S=’ ,S);

5

Подсчитать сумму четных чисел от 1 до 10  и вывести результат

For i:=1 to 10 do

begin  if   i mod 2 = 0 then

S:=S+i;   end; write(' S=' ,S);

9

Подсчитать сколько денег будет у Вас в банке через n лет и  вывести только результат

for i:=1 to n do S:=S+ S*pr/100;

write(‘ S=’ ,S);

10

Подсчитать сколько денег будет у вас в банке через n лет и  вывести все результаты

for i:=1 to n do begin S:=S+ S*pr/100;

write(‘ S=’ ,S); end;