Это ! составить программу, которая определяет является ли введенное слово словом-перевертышем ( использование pos,copy,delete,insert)

223

311

Посмотреть ответы 2

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

mamaha123

Информатика

4,7(52 оценок)

Var s : string; i : integer; f : boolean; begin readln (s); writeln ('тут ', length (s), ' символов'); f : = true; for i : = 1 to length (s) div 2 do if s[i] < > s[length (s) - i + 1] then f : = false; writeln ('это слово является перевертышем: ', f); //true/false end.//пишет истина или ложь