Найти сумму целых двузначных чисел,кратных 5. Составить блок-схему алгоритма и программу.

Question

Найти сумму целых двузначных чисел,кратных 5. Составить блок-схему алгоритма и программу.

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

program xxx; var i, s : integer; begin s:=0; for i:= 10 to 99 do if i mod 5 = 0 then s:=s+i; writeln('сумма двузначных чисел, кратных 5 =', s); readln end.