Напишите наименьшее целое число x, для которого истинно высказывание:

НЕ (X < 5) И (X < 15).

​

5

Объяснение:

Нам надо найти такой  наименьший x, который одновременно будет не меньше 5 и меньше 15. Пять не меньше 5 и меньше 15.

var a: array [1..5] of integer; s,i: integer; begin      for i : = 1 to 5 do  begin      writeln('a[',i,']=');       read(a[i]);         s: =s + a[i]  end;   writeln('s=',s); end.

если его поставить так, чтоб краев рядом не было, куда-нибудь в центр. тогда он всегда будет вертется