Укажите, какое логическое выражение равносильно выражению ¬( а \/ ¬в) /\ с ? 1) ¬а \/ в /\ ¬с 2) ( а /\ ¬в )/\ с 3) (¬а /\ в) /\ с 4) ¬а /\ ¬в /\ ¬с

мы внносим приставку не в скобки и получается ответ 3) : )

Program zadacha3; var v, vo,a ,b, t, c, h: integer; begin   writeln('моя программа вычисляет скорость при равноускоренном движении');   writeln('введите начальную скорость');   readln(a);   writeln('введите ускорение');   readln(a);   writeln('введите время');   readln(t);   writeln('введите шаг');   readln(h);   for b: =t to c do     begin       t: =t+h;       v: =vo+a*t;     end;   writeln('скорость равна v: = ',v); end.после эндом на закрытии цикла не стояло точки с запятой, и где у тебя  написано в третей строчке снизу  7v, что это я так и не понял? я убрал оттуда семёрку, если не так то поменяй, я в формулу не вдавался.и у тебя ответ в цикле стоит я не знаю так должно быть или нет, обрати внимание на это, в своём варианте я переставил ответ на после цикла

// pascalabc.net 3.0, сборка 1088 const   n=9;   m=7; var   a: array[1..n,1..m] of integer;   b: array[1..n] of boolean;   i,j,k: integer; begin   randomize;   writeln('*** исходный массив ***');   for i: =1 to n do begin       k: =0;       for j: =1 to m do begin           a[i,j]: =random(225)-112;           write(a[i,j]: 5);           if a[i,j]< 0 then inc(k)           end;       writeln;       b[i]: =k> 3   end;   writeln('*** строки, содержащие больше 3 отрицательных элементов ***');   for i: =1 to n do       if b[i] then write(i,' ');   writeln end. тестовое решение: *** исходный массив ***     89  -71    36  -25  -19    60  -28   -60  -35    20  112  -69    29    74       4  -23    -7  -15  107    64    -4   -82    91  102  -90    81    32  -64     41  -44    21    74    77  -77 -100   -38  -36  100      5  -42    54    46   -52    27  -86  -77    90    30    -2   -76  -14  -58    11    67  -91    59   -50    47  -47    12  -84  -76    11 *** строки, содержащие больше 3 отрицательных элементов *** 1 3 7 8 9