Задание

Определите, что будет напечатано в результате работы следующей программы.

var s, k: integer;

begin

s := 200;

for k := 6 to 9 do

s := s − 5 * k;

writeln(s);

end.