Вывести на экран все буквы в обратном порядке

Question

Информатика

Татьянка

22 сентября, 20:11

Вывести на экран все буквы в обратном порядке

+1

Ответы (1)

Знаете ответ на вопрос?

Акулина · Answer 1

Var

s: string;

count, i: Integer; begin

write ('Введите строку: ') ;

readln (s) ;

count : = length (s) ;

writeln ('Инверсия строки: ') ;

for i : = count downto 1 do

write (s[i]) ;

end.