Вывести на экран все буквы в обратном порядке
Вывести на экран все буквы в обратном порядке
Гость
Ответ(ы) на вопрос:
Гостьvar
s: string;
count, i: Integer; begin
write('Введите строку: ');
readln(s);
count := length(s);
writeln('Инверсия строки: ');
for i := count downto 1 do
write(s[i]);
end.
Не нашли ответ?
Похожие вопросы