Question

Var s,k: integer;
Begin
s := 0;
for k := 5 to 9 do
s := s+8;
writeln(s);
End.
Напишите ответ пожалуйста!

Answer 1

Запустил программу, выдал ответ 40