исправить ошибки решить эту программу если не сложно напишите полный ответ Pascal ABC Program factoreal;
Var F,N,k:Integer;
Write:(ведите число);
Write (большая буква N);
F:=1;
k:=1;
While (k<=N) do Begin*F/N*k=N+1 end;
Write(F);
end.

bomixov    1   07.03.2022 17:11    0