Question

8 класс. составьте программу вычисления произведения чисел от 1 до 10
1*2*3*4 ... *10

Answer 1

var m, i: integer;
begin
     m := 1;
     for i := 1 to 10 do
         m := m * i;
     writeln(m);
end.

Answer 2

это точно правильно?

Answer 3

можете проверить на калькуляторе)

Answer 4

а не хочешь еше столько же баллов заработать?)ток еще одно задание