Есть ответ 👍

Определите значения переменной s после выполнения фрагмента алгоритма:
С решением а) s:= 0;
m:=6:
for i:=3 to m do
s:=s+i;

б) s:= 0;
m:=5:
for i:=2 to m do
s:=s+i;

в) s:=0;
i:=5;
while i>0 do
begin
i:=i-1;
s:=s+i;
end;

127
207
Посмотреть ответы 2

Ответы на вопрос:


   var f := 1;

   for var i := 1 to 5 do

   begin

       f := f * i;

       writeln(i, ' -> ', f);

   end;

   writeln;

   

   var s := 0;

   for var i := 1 to 5 do

   begin

       s := s + i * i;

       writeln(i, ' -> ', s);

   end;

end.

И мы получаем такие данные

1)

1 -> 1

2 -> 2

3 -> 6

4 -> 24

5 -> 120

ответ 120

2)

1 -> 1

2 -> 5

3 -> 14

4 -> 30

5 -> 55

ответ 55

Объяснение:


Var i: integer; begin        for i : = 13 to 60 do              if(i mod 3 = 0) then write(i: 3);   end.

Популярно: Информатика