Ребята, это срочно! Составить программу, которая определяет является ли введенное слово словом-перевертышем ( использование pos,copy,delete,insert)
10-11 класс
|
ТАК,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
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.//пишет истина или ложь
Другие вопросы из категории
ПОСЛЕДОВАТКЛЬНОСТЬ НАЯИНАЕТСЯ ТАК:
ЕЕЕЕЕ
ЕЕЕЕИ
ЕЕЕЕО
ЕЕЕИЕ
КАКАЯ ОМЬМНАЦИЯ БУДЕТ НА 241 месте?
Читайте также
пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.
текст.
3)Написать программу, которая определяет является ли слово палиндромом.
4)Написать программу, определяющую какая из букв а или о встречается в тексте первой.
Помогите хотябы одну пожалуйста))Нужно до завтра!))
но не входит в слово 'овод'. Оба слова должны запрашиваться с клавиатуры
выводит на экран ответ "да" или "нет".