Было про­ве­де­но 9 за­пус­ков про­грам­мы, при ко­то­рых в ка­че­стве зна­че­ний пе­ре­мен­ных s и t вво­ди­лись сле­ду­ю­щие пары чисел:  (1,  2); (11,  2); (1,  12); (11,  12); (−11,  −12); (−11,  12); (−12,  11); (10,  10); (10,  5 Ука­жи­те ко­ли­че­ство целых зна­че­ний па­ра­мет­ра A, при ко­то­рых для ука­зан­ных вход­ных дан­ных про­грам­ма на­пе­ча­та­ет «NO» три раза.​

Program question;

var
   a: string;
   b: integer;

begin
     writeln('Сколько тебе лет?:');
     readln(b);
     if b > 17 then begin
                                 writeln('В каком институте ты учишься?:');
                                 readln(a);
                                 writeln(a, ' хороший институт');
                                 writeln('До следующей встречи!');
                            end
          else
     if b <= 17 then begin
                                 writeln('В какой школе ты учишься?');
                                 readln(a);
                                 writeln(a, ' не плохая школа');
                                 writeln('До следующей встречи!');
                                 end;
end.