Составьте таблицу истинности. Запишите упрощённое выражение для логической формулы:
z= ¬A⇒¬A∧B⇒(A∨C)
Первое отрицание А оно длится до А∧В, то есть над А∧В двойное отрицание

В последней задаче понадобятся переводные коэффициенты.
1 берковец=10 пудов=400 фунтов=38400 золотников.
Отсюда:
1 фунт = 38400/400 = 96 золотников
1 пуд = 400/10 = 40 фунтов
1 берковец = 10 пудов

№1

var
  n:integer;
 
begin
  Write('Введите двухзначное число: '); Read(n);
  n:=Abs(n); { убираем минус, если он есть }
  Writeln('Среднее арифметическое цифр числа: ',
    (n div 10 + n mod 10)/2)
end.

Пример
Введите двухзначное число: 43
Среднее арифметическое цифр числа: 3.5

№2

var
  n:integer;
 
begin
  Write('Введите двухзначное число: '); Read(n);
  n:=Abs(n); { убираем минус, если он есть }
  Writeln('Разность количества десятков и единиц равна ',n div 10 - n mod 10)
end.

Пример
Введите двухзначное число: 38
Разность количества десятков и единиц равна -5

№3

var
  a:real;
 
begin
  Write('Площадь, ар: '); Read(a);
  Writeln('Полных кв.км: ',Trunc(a/10000))
end.

Пример
Площадь, ар: 252123234
Полных кв.км: 25212

№4

const
  f=96; { фунт }
  p=40; { пуд }
  b=10; { берковец }

var
  z:longint;
  kb,kp,kf:integer;
 
begin
  Write('Введите вес в золотниках: '); Read(z);
  kf:=z div 96;
  z:=z mod 96;
  kp:=kf div 40;
  kf:=kf mod 40;
  kb:=kp div 10;
  kp:=kp mod 10;
  Writeln('Это составит ',kb,' берковцев, ',kp,' пудов, ',
      kf,' фунтов, ',z,' золотников')
end.

Пример
Введите вес в золотниках: 374252
Это составит 9 берковцев, 7 пудов, 18 фунтов, 44 золотников

Начнем...
Я люблю сидеть в интернете, общаться по Skype, и просиживать в соц.сетях, а также сидеть на различных сайтах( пкречислите какие). Однако интернет - не только огромное количевство информации, но и куча вирусов, всплывающих окон которые подталкивают к суициду, прекращение есть пищи, насилие, порнография и многое другое. Обычным пользователям на легко жить таким образом. Более опытные ставят на браузера специальные плагины, с которых можно избавиться хотя-бы от рекламы. Но куча других опасностей как спам. Например подруга отправила ссылку на сайт, открыв предлагается ввести номер, после чего с вашего счета снимается 300 рублей. Однако можно защититься от всего этого, ставя антивирусы. Но у антивирусов есть огромный недостаток, так сказать защита от вирусов мадам, а в замен скорость вашего компьютера. Естественно что антишманти вам хотя не всегда, но например на слабых компьютерах это слишком замедлит работу. Особенно если вы решили купить недорогой ноутбук например, и решили что он будет для работы, там важные документы, поэтому ставлю антивирус. В итоге получив защиту от вирусов, вы взамен отдаете производительность. Интернет может быть безопасным, однако лучше предостеречься и поставить антивирус.