ИНАЧЕ МНЕ ХАНА с компом проблема,я не системный админ скачивал не с диска не с флешки а с какого то приложения,выключился свет включился а комп не работает

​

1) ¬(¬A ^ B) ^ ¬C =( ¬(¬A)∨¬B)∧¬C = (A∨¬B)∧¬C
выражение эквивалентно выражению под цифрой 4)

2) Для того чтобы выражение было истинным надо чтобы истинными были каждое из выражений
(Y < 5) и    ((Y > 1) -> (Y > 5)) 
первое выражение истинно для всех указанных Y.
рассмотрим второе выражение: ((Y > 1) -> (Y > 5)) 
это выражение ложно только если (Y > 1) истинно,  а  (Y > 5) ложно
выражение (Y > 5)  ложно для всех Y, 
а выражение (Y > 1) истинно для Y = 2 , 3 , 4
Таким образом выражение  ((Y > 1) -> (Y > 5)) истинно только для Y= 1
поэтому правильный ответ под номером  1)

В задании требуется ввести код программы, описанной на странице 228 учебника и надо изменить программу так, чтобы она считала отклонения средней температуры каждого месяца от среднегодовой величины, должно получиться так:

Program Temperature;
var T: array[1..12] of real;
Dt:array[1..12] of real;
i:integer; Tsred:real;
begin
  for i:=1 to 12 do begin
    write('T[',i:2,'] = ');
    readln(T[i]);
  end;
  Tsred:=0;
  for i:=1 to 12 do
    Tsred:=Tsred+T[i];
  Tsred:=Tsred/12;
  Writeln('Среднегодовая температура = ',Tsred:6:2);
  for i:=1 to 12 do begin
    Dt[i]:=T[i]-Tsred;
    writeln('Dt[',i:2,']',Dt[i]:6:2);
  end;
end.

Ну а результаты получите, когда запустите программу.