Помогите с информатикой очень нужно 10 класс

Помогите с информатикой очень нужно 10 класс (Паскаль) С клавиатуры вводят символ 1 Составить программу, которая проверяют не совпадают ли 2-я и предпоследняя буква.2 Составить программу, которая выводит на экран средний символ если такой существует 3 Составить программу, которая определяет код введенного символа 4 Составить программу, которая определяет, является ли строка пустой. ОЧень нужно, спасибо заранее

в избранное

boresh

18 февраля 2023

Uses crt; var s,f2,f3: string; f1,f4: boolean; beginf1: =false; f4: =false; read (s); if length (s) >=1 thenbeginif s[2]=s[length (s) -1] thenf1: =true; if length (s) mod 2<>0 thenbeginf2: =s[ (length (s) DIV 2)+1]; f3: =inttostr (ord (s[ (length (s) DIV 2)+1]); end; end; if s=' thenf4: =true; writeln ('Совпадение 2 и предпоследнего элемента: ',f1,#13#10,'Средний символ: ',f2,#13#10,'Его код: ',f3,#13#10, 'Пустота строки: ',f4); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?