Укажи наименьшее целое число X, для которого истинно высказывание

Для того, чтобы было истинно высказывание, нужно чтобы были истинны обе части - НЕ (X 20), (X > 6)

Возьмём число 6:

НЕ (6 20) = истинна, т.к. (6 20) - ложь

(6 > 6) = ложь, т.к. 6 = 6

Число 6 не подходит

Возьмём число 7:

НЕ (7 20) = истинна, т.к. (7 20) - ложь

(7 > 6) = истинна

Минимальное возможное целое число - 7

min і max нужно присвоить а[1].

var s,s1: string; n,i: integer; begin readln(s); readln(n); for i: =1 to n do begin insert(s[1],s1,length(s1)+1); delete(s,1,1); end; s: =s+s1; writeln(s); end.