Задать вопрос
17 мая, 15:26

Написать программу, которая подсчитывает количество слов в заданной строке, начинающихся и заканчивающихся на одну и ту же букву.

(Язык программирования паскале)

+3
Ответы (1)
  1. 17 мая, 17:14
    0
    Program qwerty; var s:string; p, n, i:integer; begin write ('введите слово') ; readln (s) ; p:=0; for i:=1 to n:=length (s) div 2 if s[i]=s[n-i+1] then p:=1; if p=1 then write ('слово полиндром') else write ('не полиндром') ; readln; end. (не суди за ошибки : D)
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Написать программу, которая подсчитывает количество слов в заданной строке, начинающихся и заканчивающихся на одну и ту же букву. (Язык ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы