Составить программу для Pascal....так что бы в слове удалялась последняя буква

1

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

2013-02-05T12:04:08+00:00

uses crt;
var
n: byte;
st: string;
begin
readln(st);
n:= length (st);
delete (st,n, 1);
writeln (st);
readkey;
end.