Найти сумму четных чисел от 1 до 30. Написать блок схему и программу.
Найти сумму четных чисел от 1 до 30. Написать блок схему и программу.
Гость
Ответ(ы) на вопрос:
Гостьvar n, m, sum: integer; begin sum := 0; repeat writeln('Введите числ с которого начинается ряд'); readln(n); writeln('Введите число которым заканчивается ряд'); readln(m); until n
Не нашли ответ?
Похожие вопросы