Блок-схема,цикл Знайти суму перших десяти парних чисел
Блок-схема,цикл Знайти суму перших десяти парних чисел
Гость
Ответ(ы) на вопрос:
Гостьprogram one;var i, n: integer;
begini:=0;n:=10;while n <> 0 dobegininc(i, n);dec(n);end;write('Сумма первых 10 чисел = ', i);
end.
Не нашли ответ?
Похожие вопросы