Есть ответ 👍

Для строки введённые с клавиатуры посчитать количество букв (а) в ней для строки введённые с клавиатуры вывести букву с которой она начинается
букву в которой она заканчивается
проверьте является ли палиндромом слова введённое с клавиатуры
program :lyuboe
var s:string
i.k:integer
begin reason(s) ;k=length(s) ;for I=1
to k do if s(I) =s[k] then begin s:=copy ( s, I+1,k-2) ;k:=k-1; end; writeln(подходит) ; end. ​

291
428
Посмотреть ответы 1

Ответы на вопрос:

Zelais
4,8(13 оценок)

https://ru-static.z-dn.net/files/d90/bf7940b51f8f80ddb31969fa7a04ec1c.png

https://ru-static.z-dn.net/files/dcd/c0fc5f26bd521de1f9f62d94d439cb9c.png

Популярно: Информатика