Ответы
Ответ дал:
0
program slovo;
var s: string; i: integer;
Begin
writeln('введите слово'); readln(s);
for i:=length(s) downto 1do begin
write(s[i]);
end;
End.
Вас заинтересует
2 года назад
2 года назад
10 лет назад
10 лет назад
10 лет назад