Написать программу для нахождения суммы первых пяти нечетных чисел (Паскаль)
Написать программу для нахождения суммы первых пяти нечетных чисел (Паскаль)
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program SumOfFirstFiveOddNumbers;
var
i, count, sum: Integer;
begin
count := 0;
sum := 0;
for i := 1 to 10 do
if count = 5 thenbegin
if i mod 2 <> 0 then
begin
sum := sum + i;
count := count + 1;
break;
end;
end;
writeln('Сумма первых пяти нечетных чисел: ', sum);
end.