4) Використовуючи цикл for..to..do
написати фрагмент програми для
знаходження добутку чисел від 2 до
10 включно на Паскаль
Ответы
Ответ дал:
1
var i,a:integer;
begin
a:=1;
for i:=2 to 10 do
a*=i;
write(a)
end.
Как считает программа:
a = 1*2, a = 2*3, a = 6*4, a = 24*5, a = 120*6, a = 720*7, a = 5040*8, a = 40320*9, a = 362880*10, a = 3628800
Вас заинтересует
4 месяца назад
4 месяца назад
5 месяцев назад
2 года назад
7 лет назад
7 лет назад