76

Составьте программу, печатающую слово в обратном порядке.

28 февраля 2023

Составьте программу, печатающую слово в обратном порядке.

категория: информатика



52

Var s: string; i: integer; Begin Readln (s); i: =length (s); while (i>0) and (s [ i]=') do i: =i-1; if i=0 then Writeln ('слова в строке не обнаружены') else repeat Write (s[ i]); i: =i-1 until (i=0) or (s[ i]='); End.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...