Запишите равносильные условия, не используя операцию не: а) not (а < 6) б) not (b == c+d) в) not( c ! = 15)

а) a> 6

б) b ! = c+d

в) c == 15

пусть введенный интервал будет

b и c,где b< c

var a,b,c,i: longint;

begin

    read(b,c);

    for i: =b to c do

            if i mod a=0 then write(i);

end.

не одновременно, а сначала alt и только потом 3 (на цифровой клавиатуре - справа)