Question

//fpc 3.0.0

паскаль информатика решите пж

program HelloWorld;
var s,k: integer;
begin
s := 5
for k := 7 to 14 do
s := s + 2 * k
writeln (s);
end.

Answer 1

s = 5

s = 5+2*7+2*8+2*9+2*10+2*11+2*12+2*13+2*14 = 173

На экран будет выведено: 173

Answer 2

5+2*7+2*8+2*9+2*10+2*11+2*12+2*13+2*14 = 173

Ответ 173