Некто Ввод стандартный ввод или input.txt
Вывод стандартный вывод или output.txt

Фигура подходила всё ближе. Шла она будто рывками. Остановится, затем сделает несколько шагов и снова остановится. Интересно, что она задумала?

Ага! Наконец-то Софи поняла!

Этот некто задерживался перед каждым домом. Остановится — и заглядывает в окна верхних этажей. Для этого ему приходилось сгибаться в три погибели — вот каким он был высоким!

Замрёт, заглянет в комнату, проскользнёт к следующему дому и станет как вкопанный. И так по всей улице!

Напишите программу, которая будет выводить предположения, кто это и в какое по счету окно оно заглянет.

Формат ввода
Вводится слово, затем последовательность чисел, пока не будет введено число 42 (служит признаком окончания ввода, в рассмотрении не участвует).

Формат вывода
Для каждого числа нужно найти, сколько раз в нем помещается число 42, это и будет номер окна. И вывести строку в формате:

заглядывает в окно !

Пример 1
Ввод
Великан
148
1984
43
42
Вывод
Великан заглядывает в окно 3!
Великан заглядывает в окно 47!
Великан заглядывает в окно 1!

Пример 2
Ввод
Чудовище
1233456
12
42
Вывод
Чудовище заглядывает в окно 29368!
Чудовище заглядывает в окно 0!

Var
   a,b,d,K,kp:integer;
   P:boolean;
Begin
kp:=0;
ReadLn(a,b);
if (a = 1)or(a = 2) then
   Begin
   kp:=2;
   Write(2,' ',3)
   end
else if a = 3 then
        Begin
        kp:=1;
        Write(3);
        End;
if a < 5 then a:=5
else if a mod 2 = 0 then a:=a+1;
While a<=b do
   Begin
   K:=Trunc(Sqrt(A));
   d:=3;
   P:=true;
   While d <= K do
      Begin
      if A mod d = 0 then P:=false;
      d:=d+2
      End;
   if P then
      Begin
      kp:=kp+1;
      Write(' ',a);
      End;
   a:=a+2
   End;
if kp = 0 then Write(0)
End.

"Память ЭВМ служит для хранения исходных данных, команд программ, а также промежуточных и окончательных результатов вычислений. Информация, содержащаяся в памяти компьютера, по мере необходимости выдаётся в другие устройства машины (Центральное устройство управления, Арифметико-логическое устройство, устройства вывода и др.) .
Основная память тесно связана с Арифметико-логическим устройством и служит для хранения информации, используемой в ближайшей серии вычислений.
Информация из основной памяти обычно извлекается определёнными порциями.
Все ячейки основной памяти пронумерованы.
Номера ячеек памяти являются адресами тех данных, которые хранятся в них.
При считывании машинного слова из ячейки основной памяти содержимое этой ячейки при необходимости восстанавливается и может быть в дальнейшем снова получена из той же ячейки.
При записи информации хранившиеся в ячейке памяти слово стирается и его место занимает
Наряду с оперативной и сверхоперативной памятью в современных компьютерах используется ещё один вид внутренней памяти – постоянная память, реализуемая постоянными запоминающими
Постоянные запоминающие устройства служат для хранения различных констант и постоянных программ. Информация в них записывается однократно, обычно в процессе изготовления устройства, а в дальнейшем только считывается без разрушения.
В тех случаях, когда занесение информации производится в эксплуатационных условиях соответствующей настройкой, такие постоянные запоминающие устройства называются программируемые постоянные запоминающие
Внутренняя память ЭВМ (основная память, сверхоперативная память, постоянные запоминающие устройства, программируемые постоянные запоминающие устройства) непосредственно взаимодействуют с процессором и вместе с ним образуют центральную часть (ядро) компьютера. Кроме центральной части в состав компьютера входят также различные периферийные ( внешние) устройства, которые по своему значению делятся на две внешней памяти, предназначенные для хранения больших массивов ввода и вывода, обеспечивающие связь компьютера с внешней средой, в том числе с пользователями, путём ввода в компьютер информации, её регистрации и
информацией между центральной частью и периферийными устройствами ЭВМ ..."