//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.
s = 5
s = 5+2*7+2*8+2*9+2*10+2*11+2*12+2*13+2*14 = 173
На экран будет выведено: 173
5+2*7+2*8+2*9+2*10+2*11+2*12+2*13+2*14 = 173
Ответ 173