Используя, команду while напишите программу вычисления суммы и произведения натурального ряда чисел от 1

Question

Информатика: Используя, команду while напишите программу вычисления суммы и произведения натурального ряда чисел от 1 до n

samikby · Answer

Begin m:=1; k:=1; read(n); i:=1; while i n do begin k:=k+i; m:=m*i; i:=i+1; end; write(k, ,m); end. Переменные, думаю, сами опишете)...

Используя, команду while напишите программу вычисления суммы и произведения натурального ряда чисел от 1 до n