Составьте программу, которая выводит на экран сумму чисел кратных 8-ми от 50 до 600.

а почему ответ 22632?

У вас задание вывести сумму чисел,а не сами числа

большое вам спасибо

program n;uses crt;var i,s:integer;begins:=0;for i:=50 to 600 doif (i mod 8)=0 then s:=s+i;writeln(s);end.