Ответы
Ответ дал:
0
Ответ:
Var
s: String;
i: Byte;
BEGIN
Writeln('Введите слово: ');
Readln(s);
Writeln('Слово наоборот:');
For i:=Length(s) downto 1 do
Write(s[i]);
Readln
END.
Объяснение:
Вас заинтересует
1 год назад
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад