Language:
Русский
English
{StrPas.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the StrPas function.}
uses Strings, WinCrt;
var
A: array[0..79] of Char;
S: string[79];
begin
Readln(A);
S := StrPas(A);
Writeln(S);
end.
 StrPas.PAS |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
|
|
|
|
|
|
Код для вставки:
 ::
 ::
 ::
ГОСТ ::
Поделиться:
|
|