Определите, что будет напечатано в результате работы следующей программы.
Var s, k: integer;
Begin
s:=1
for k:=1 to 5 do
s:=s*k;
write (k);
End.

вика3730    2   13.05.2020 17:50    1