составить программу которая в заданой символьной строке удаляет последние 3 буквы

1

Ответы и объяснения

2012-12-28T08:51:14+04:00

var
    s : String;
begin


    Writeln('Введите строку: ');
    Readln(s);

 

    Delete(s, Length(s) - 2, Length(s));

 

    Writeln;
    Writeln(s);

 

    Readln;
end.