Вам, наверное, известно, что некоторые символы, записанные на листе бумаги, после поворота этого листа на 180ᶱ также можно прочитать, хотя и по-другому. Так, прописные латинские буквы H, I, N, O, S, X, Z и цифра 0 после поворота читаются так же, а буква M и цифра 6 «превращаются» соответственно в символы W и 9, и наоборот. Непустую строку, состоящую из прописных латинских букв и цифр, будем называть словом-перевёртышем, если она составлена только из перечисленных выше символов. После поворота листа это слово также можно прочитать, хотя и по-другому. Так, строка HOW «превращается» в строку MOH. С другой стороны, строка HOME словомперевёртышем не является. Найдите все слова-перевёртыши во входном файле. Формат входных данных. Первая строка входного файла содержит величину K (1 ≤ K ≤ 1000) – количество обрабатываемых в дальнейшем строк. Каждая из последующих K строк состоит только из прописных латинских букв и цифр, пустых строк нет. Длина одной строки не превосходит 3000 символов
Формат выходных данных. В первой строке выведите одно число – количество найденных слов-перевёртышей. Каждая из последующих строк должна содержать строку, которая получится из очередного слова перевёртыша после поворота листа бумаги. Слова-перевёртыши нужно выводить в том порядке, в котором они встречаются во входном файле. В начале и конце каждой строки не должно быть пробелов

НАПИСАТЬ ПРОГРАММУ

const

a : array[1..10] of integer = (12, 5, 4, 1, 9, 7, 8, 2, 3, 2);

var k, _counterW, _counterS: integer;

begin

_counterS := 0;

_counterW := 0;

for k := 1 to 10 do

   begin

   if (a[k] = 12) or (a[k] = 1) or (a[k] = 2) then

       _counterW := _counterW + 1

   else if (a[k] = 6) or (a[k] = 7) or (a[k] = 8) then

       _counterS := _counterS + 1;

   end;

writeln('Количество родившихся летом:', _counterS);

writeln('Количество родившихся зимой:',_counterW);

if _counterW > _counterS then

   writeln('Зимой родилось большее количество учащихся!')

else if _counterS > _counterW then

   writeln('Летом родилось большее количество учащихся!')

else

   writeln('Летом и зимой родилось одинаковое число учащихся!');

end.

1.    Он американский ученый, основоположник кибернетики. А также теории об искусственном интеллекте. Славу ему принесли его работы в математике и физике. Его большая роль в том, что именно он впервые смог понять огромное значение того, что информация будет использоваться в процессах управления.

2.       Основатель теории информации, которая нашла свое место в современных системах связи. В 40-х годах века ввел понятие «бит».

3.       Термин, который означает «выполняющееся действие по запросу», ввел Тед Нельсон в веке, в 1963 году.

4.       В 1989 году. Изобретателем считают двух человек – Тима Бернерс-Ли и Роберт Кайо.

5.       Эйлер, в честь которого назвали графическую схему, был ученым. Его сферой изучения была математика, физика, астрономия, химия, ботаника, музыка, медицина и другие направления. Он автор 600 трудов.

Объяснение: