Отметь то ,что является высказыванием

составим таблицу:

                        | молоко  | лимонад | квас | вода

бутылка |       -          |              +          |      -      |      -

стакан    |          -          |            -           |      -      |      +

кувшин  |          +          |            -            |      -     |      -

банка      |          -            |            -           |      +    |        -

во - первых рассмотрим простые высказывания:

м - монитор неисправен

в - видеокарта неисправна

о - оперативная память неисправна

во вторых: запишем на языке логики возможные предположения: (m v b) --> o и m --> b

пусть  f(м,в,о) =  (m v b) --> o и m --> b

составляем таблицу истинности:

м     в     о     m --> b      

0       0     0         1

1       0     1         1

0       0     0         1

1       1     1         0

0       0     0         1

0       1     1         0

1       1     0         0

1       1     1         1

1       0     0         0

1       0     0         0

0       1     1         1

1       1     0         1

0       1     1           0

1       1     1           1

0       0     1           0

1       1     0           1

1       1     0           1

1       0     1           1                

анализ таблицы показывает, что сложное высказывание истинно во всех случаях, когда м – истинно, т.е. вероятнее всего  неисправен именно монитор.

данное слово - центрирование

const alphabet="яабвгдеёжзийклмнопрстуфхцчшщъыьэюя"; var filename: stringprocedure readfile(filename: string); var f: text; s: string; i,k: integer; begin      assign(f,filename);       reset(f);       while not eof (f) do begin { пока не конец файла }            readln (f, s);             for i: = 1 to length(s) do begin              k: =pos(s[i], alphabet);                   if k=1 then k=length(alphabet); {это приколы изза я}                   if k> 1 then s[i]: =alphabet[k-1];         end;             writeln(s);       end;       close(f); end; begin      read(filename);       readfile;       readln; end.