10 lines
208 B
ObjectPascal
10 lines
208 B
ObjectPascal
программа Тест;
|
||
|
||
проц ВыводСтро(obj: object);
|
||
нач
|
||
Writeln(obj);
|
||
кон;
|
||
|
||
нач
|
||
ВыводСтро('ПаскальЁКЛМН.сеть работает1!');
|
||
кон. |