Правила форума
Language:
Русский
English
{StrPCopy.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the StrPCopy function.}
uses Strings, WinCrt;
var
A: array[0..79] of Char;
S: string[79];
begin
Readln(S);
StrPCopy(A, S);
Writeln(A);
end.
 StrPCopy.PAS |
::
::
::
