Найди значение выражения.

(x<12)∨(x<11)¯¯¯¯¯¯¯¯¯¯¯¯ для числа x=3

ложь

Подставляем 3 вместо х.

(3 < 12) & не(3 < 11)

(истина) & не(истина)

(истина) & (ложь)

ложь

var

i,s: integer;

begin

s: =0;

for i: =2 to 5 do

s: =s+i*i;

writeln(s);

end.

random это  функция  возвращающая случайные числа от 1 до указанного диапазона, но отрицательных чисел тут нет, так что воспользуемся приемом:

a: = random(101)-50;       {числа от -50 до 50}

b: = random(101)-200;     {от -100 до 100}

а теперь выведи на экран все положительные, а затем отрицательные элементы - проверяй на больше/меньше нуля!