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

1

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

2012-11-18T18:36:04+04:00

program slovo;
var s: string; i: integer;
Begin
writeln('введите слово'); readln(s);
for i:=length(s) downto 1do begin
write(s[i]);
end;
End.