Написать программу, которая вычисляет сумму первых n целых положительных чисел. Кол-во суммируемых чисел должно вводиться во время работы программы. Ниже представлен рекомендуемый вид экрана во время работы программы : Вычислен...
Написать программу, которая вычисляет сумму первых n целых положительных чисел. Кол-во суммируемых чисел должно вводиться во время работы программы. Ниже представлен рекомендуемый вид экрана во время работы программы :
Вычисление суммы четных положительных чисел.
Введите количество суммируемых чисел и нажмите
-> 12
Сумма первых 12 положительных четных чисел равна 156.
Гость
Ответ(ы) на вопрос:
ГостьProgram z1; var i, n, b: integer; begin writeln ('Введите любое целое число'); read (n); for i:=1 to n*2 do if i mod 2=0 then b:=b+i; writeln (b); end.
Не нашли ответ?
Похожие вопросы