Файлы. Работа с текстом.
Добавлено: 18 апр 2013, 19:44
Задача на паскаль: Если строка начинается с цифры, то перед ней поставить левую круглую скобку, а в конец строки - правую круглую скобку
Код: Выделить всё
var s:string;
begin
readln(s);
if ( ord(s[1]) > 48 ) and ( ord(s[1]) < 57 ) then write( "("+s+")" );
readln;