Составить блок схему к программе
var n,i: integer;
f: real;
begin
readln(n);
i: =0;
f: =1;
while i begin
i: =i+1;
f: =f*i;
end;
write(n,'! =',f: 0: 0);
readln
end.
​

Dangerrr    1   04.09.2019 18:23    5