Онисий
6 год назад
С помощью оператора for напишите программу определения суммы всех нечетных чисел в диапазоне от 1 до 99 включительно.
ОТВЕТЫ
Нащокин
Jul 24, 2019
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
Смежные вопросы: