найти сумму элементов массива A(N), умножение. Потом заменить первый элемент массива суммой, а последний умножением

271

402

Посмотреть ответы 1

Ответы на вопрос:

23вопрос4

Информатика

4,6(79 оценок)

Var n, i, sum : integer; begin writeln(' введите количество суммируемых чисел'); readln(n); sum : = 0; for i : = 1 to n do sum : = sum + i; writeln(' сумма первых ', n, ' положительных чисел равна ', sum); end.