ПАСКАЛЬ: Знайдіть всі числа з інтервалу 100-200 кратні 25. Знайдіть їх суму та кількість.ЛЮДИИ... ПОМОГИТЕ!!!
ПАСКАЛЬ:
Знайдіть всі числа з інтервалу 100-200 кратні 25.
Знайдіть їх суму та кількість.
ЛЮДИИ... ПОМОГИТЕ!!!
Гость
Ответ(ы) на вопрос:
Гость program 12332586;
var i,s:integer;
begin S:=0;
for i:=100 to 200 do
if (i mod 25=0) then
S:=S+i;
writeln(s);
end.
Не нашли ответ?
Похожие вопросы