1. Информатика
  2. Дана строка. если количество

Дана строка. если количество символов в ней нечетно ,то выведите на экран средний символ строки. паскаль.

Кндр15 Кндр15    3   01.07.2019 06:00    0

Ответы
pashalol3 pashalol3  24.07.2020 16:16
 var   
s : string;   
l : integer; 
begin 
readln (s); 
l := Length(s);   
if l mod 2 = 1 then   
writeln (s[l div 2 + 1]); 
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
FzdAngels FzdAngels  12.04.2020 20:15
Задание 1 Во Компьютерная графика - это ... Выберите несколько из 4 вариантов ответа: 1) наука, один из разделов информатики, изучающий создания и обработки изображений...
НяnKет НяnKет  12.04.2020 20:15
ВТОРНИК, 14 Апр 2020 Информатика Напишите программы к задачам: 1. Даны переменных X, Y и Z. Найти сумму, произведение, сумму квадратов и среднее арифметическое этих...
берсик7 берсик7  12.04.2020 20:15
Если у меня тема проекта Сравнение операционных систем MacOS и Windows, то каким будет предмет исследования и объект исследования?...
lolgg2 lolgg2  08.06.2020 20:35
решить задачу на Паскаль : Написать программу рисующую ровно по центру рабочего окна зелёный прямоугольник заданных пользователем размеров. После этого программа...
Tenur Tenur  08.06.2020 20:30
Нужно написать рабочую программу Delphi чтобы считала стоимость окон....
Catia2006 Catia2006  14.04.2020 12:23
Во по теме: Мультимедиа 1. От каких латинских слов происходит слово мультимедиа .2. Что собой представляет технология мультимедиа?3. Области применения мультимедийных...
Sashka1712 Sashka1712  28.07.2019 00:30
Ниже записана программа. получив на вход число x, эта программа печатает два числа. укажите набольшее из таких чисел x, при вводе которых алгоритм печатает сначала...
olezhkash228 olezhkash228  28.07.2019 00:30
51. с проводника , кратко опишите последовательность действий создания на диске d: трех уровневой структуры папок, вложенных в друг друга (d: \pentium i\ pentium...
Daniil2305 Daniil2305  28.07.2019 00:30
Всистеме автоматического информация от объекта к объекту транслируется в виде: а)системы команд; б)системы суждений; в)системы предикатов; г)системы высказываний;...
Наташа5979 Наташа5979  20.09.2019 12:01
Решить (цепочки превращений) cao= ca(oh)2= ca(no3)2= hno3= cu(no3)2...

Популярные вопросы