Есть ответ 👍

1. Var s,k: integer;
Begin
s := 2;
for k := 1 to 3 do
s := s*s;
writeln(s);
End.
ответ: _?_
2. Var s,k: integer;
Begin
s := 1;
for k := 3 downto 0 do
s := s*3;
write(s);
End.
ответ: _?_
3.Var u,i: integer;
Begin
u := 30;
For i := 1 to 6 do
u := u – i;
Writeln(u);
End.
ответ: _?_
4. Var s,k: integer;
Begin
s := 0;
for k := 4 to 10 step 2 do
s := s + 11;
writeln(s);
End.
ответ: _?_

134
500
Посмотреть ответы 2

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

fomenko6
4,6(90 оценок)

При выполнении этих програм будут следующие результаты:

1) 256

2) 81

3) 9

4) 22

irror404
4,7(20 оценок)

1 книга мальчику и девочки 2 учитель ученикам

Объяснение:

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