Сосчитать сумму и количество двухзначных чисел, кратных 7. Язык программирования - Паскаль.
Сосчитать сумму и количество двухзначных чисел, кратных 7. Язык программирования - Паскаль.
Гость
Ответ(ы) на вопрос:
Гостьvar a,k,s:integer;
begin for a:=10 to 99 do begin
if (a mod 7=0) then s:=s+a;
k:=k+1;
end;
writeln(s);
writeln(k);
end.
Не нашли ответ?
Похожие вопросы