Потдчитатт суму всех нечетных чисел от 230 430 помогите срочно
Потдчитатт суму всех нечетных чисел от 230 430 помогите срочно
Гость
Ответ(ы) на вопрос:
Гость230 430:2=115 215- чётные числа до 230 430
Гостьvar
k,sum:integer;
begin
for k:=230 to 430 do
if (k mod 2<>0) then
sum:=sum+k;
write(sum);
end.
Не нашли ответ?
Похожие вопросы