В паскале. Написать программу вычисления суммы всех двухзначных нечетных чисел.
В паскале. Написать программу вычисления суммы всех двухзначных нечетных чисел.
Гость
Ответ(ы) на вопрос:
Гость Var a,s:integer;
begin
s:=0;
a:=11;
while a<=99 do
begin
s:=s+a;
a:=a+2;
end;
writeln('s = ',s);
end.
Результат:
s = 2475
Не нашли ответ?
Похожие вопросы