Определите,что будет напечатано в результате работы следующей программы:
Var s,k:integer;
Begin
s:=1;
for k:=1 to 5 do
s:=s*k
write (s);
End
Var s,k:integer;
Begin
s:=1;
for k:=1 to 5 do
s:=s*k
write (s);
End
More Questions From This User See All
Answers & Comments
Ответ:
Программа ищет произведение чисел от 1 до 5
S=1*2*3*4*5=120
Ответ: 120
Если мой ответ оказался Вам полезен, то прошу отметить его, как "лучший"