Решение 6 задания ОГЭ по информатике (6.6) про циклические алгоритмы

1
2
3
4
5
6
7

Var s, k: integer;
Begin
s := 2;
for k := 1 to 5 do
  s := s*2;
write (s);
End.

Var s, k: integer; Begin s := 2; for k := 1 to 5 do s := s*2; write (s); End.

1
2
3
4
5
6
7
8

DIM s AS INTEGER
DIM k AS INTEGER
s = 2
FOR k = 1 TO 5
  s = s*2
NEXT k
PRINT s
END

DIM s AS INTEGER DIM k AS INTEGER s = 2 FOR k = 1 TO 5 s = s*2 NEXT k PRINT s END