Question

Найти сумму положительных целых чисел от -50 до 200, кратных 5 и 8

Answer 1

Если одновременно 5 и 8, то пишешь такую программку на Pascal

var s,i:longint;
begin
s:=0;
for i:=1 to 200 do   
if (i mod 5=0)and(i mod 8=0) then s:=s+i;
writeln(s);
end.

И получаешь 600.

Если либо 5, либо 8, либо и 5 и 8, то такая программа

var s,i:longint;
begin
s:=0;
for i:=1 to 200 do   
if (i mod 5=0)or(i mod 8=0) then s:=s+i;
writeln(s);
end.

В ответе 6100.

Answer 2

Лучшая программа - короткая и наглядная программа. Тогда её и проверить проще, и ошибок меньше.

Answer 3

Да, только по условию задачи i меняется от -50

Answer 4

Верно. Но надо быть лишенным мозга, чтобы среди отрицательной части диапазона искать положительные числа.

Answer 5

))) Но школьнику надо объяснить почему выбран такой диапазон

Answer 6

Объяснит всегда полезно, согласен