Оператор Repeat. Найти сумму всех нечетных двузначных чисел.
Оператор Repeat.
Найти сумму всех нечетных двузначных чисел.
Гость
Ответ(ы) на вопрос:
Гостьvar a,s:integer;
begin
s:=0;
a:=9;
repeat
a:=a+2;
s:=s+a;
until a=99;
writeln('s = ',s);
end.
Результат:
s = 2475
Не нашли ответ?
Похожие вопросы