Регистрация
Войти
Стать экспертом Правила
Информатика

С помощью оператора for напишите программу определения суммы всех нечетных чисел в диапазоне от 1 до 99 включительно.

ОТВЕТЫ

var
i,sum :integer;
begin
sum:=0;
for i:=1 to 99 do
if i mod 2lt;gt;0 then sum:=sum+i;
writeln (sum=,sum);
end.


172
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам