Language:
Русский
English
{StrCopy.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the StrCopy function.}
uses Strings, WinCrt;
var
S: array[0..15] of Char;
begin
StrCopy(S, 'Turbo Pascal');
Writeln(S);
end.
StrCopy.PAS |
Language: {StrCopy.PAS} uses Strings, WinCrt; var |
|
|