Напишите программу определяющую сумму всех нечетных чисел от 1 до 99
Напишите программу определяющую сумму всех нечетных чисел от 1 до 99
Гость
Ответ(ы) на вопрос:
Гостьprogram pr1;
var i: integer;
begin
for i := 1 to 99 do
if (i mod 2 = 0) then
write(i + ' ');
end.
Не нашли ответ?
Похожие вопросы