Напишите наибольшее целое число Х для которого истинно высказывание (x<45) или НЕ РЕШЕНИЕ И +-объснение ДАЮ 35, БАЛЛОВ

66

Объяснение:

Потому что 66 < 45 и 66 < 67

14                                                                                                                       

var ch,n,i: longint;

ch1,s: string;

begin

  read(s,ch);

  n: =length(s);

  writeln(n,' ',ch);

  str(ch,ch1);

  for i: =1 to n do if s[i]=ch1 then write(i,' ');

end.