Правила форума
StrPCopy.PASЯзык:
Русский
English
{ Пример программы для функции StrPCopy }
uses Strings, Crt;
var
A : array[0 .. 79] of Char;
S : String[79];
begin
ReadLn(S);
StrPCopy(A, S);
WriteLn(A);
end.
var
A : array[0 .. 79] of Char;
S : String[79];
begin
ReadLn(S);
StrPCopy(A, S);
WriteLn(A);
end.
::
::
::
