Сосчитать сумму и количество двухзначных чисел, кратных 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.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы