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

1
2
3
4
5
6
7

Var s,k: integer;
Begin
s := 0;
for k := 3 to 8 do
   s := s + 9;
writeln(s);
End.

Var s,k: integer; Begin s := 0; for k := 3 to 8 do s := s + 9; writeln(s); End.

1
2
3
4
5
6

DIM k, s AS INTEGER
s = 0
FOR к = 3 TO 8
  s = s + 9
NEXT k
PRINT s

DIM k, s AS INTEGER s = 0 FOR к = 3 TO 8 s = s + 9 NEXT k PRINT s

1
2
3
4
5
6
7

Var s,k: integer;
Begin
s:=0;
for k:=1 to 11 do
  s:=s+12;
write(s);
End.

Var s,k: integer; Begin s:=0; for k:=1 to 11 do s:=s+12; write(s); End.

1
2
3
4
5
6
7

DIM k, s AS INTEGER
s = 0
FOR k = 1 TO 11
  s = s+12
NEXT k
PRINT s
END

DIM k, s AS INTEGER s = 0 FOR k = 1 TO 11 s = s+12 NEXT k PRINT s END