Язык:
Русский
English
{ Пример программы для функции StrCopy }
uses Strings, Crt;
var
S : array[0 .. 15] of Char;
begin
StrCopy(S, 'Turbo Pascal');
WriteLn(S);
end.
var
S : array[0 .. 15] of Char;
begin
StrCopy(S, 'Turbo Pascal');
WriteLn(S);
end.
|
Код для вставки:
::
::
::
ГОСТ ::
Поделиться:
|
|