Задание:
Составить программу которая вычисляет произведение первых 93 натуральных чисел
Решение:
var i,n,s: byte; begin write ('Введите n: '); readln (n); s: =0; for i: =1 to n do s: =s+i; writeln ('Сумма первых ',n,' натуральных числел равна ',s); end.
Знаете другой ответ?