Найти произведение чисел от 1 до 10, в паскале

Задание:

Найти произведение чисел от 1 до 10, в паскале

Решение:

var i,s: integer; Begins: =1; for i: =2 to 10 do s: =s*i; writeln (s); end.

Знаете другой ответ?

Отправить свой ответ