Заполни таблицу истинности.(Перемести правильные значения в окошки.)Логическое выражение: P = (Y∨B)¯¯¯¯¯¯¯¯¯¯¯∧(B∨C)

Объяснение:

0

0

0

1

0

1

1

обычно 1 символ = 1 байт = 8 бит, если другое не оговаривается в условии следовательно:

14400 * 10 : 8 = 18000 символа

336600 * 10 * 8 = 420750 символа

function max (x,y : longint) : longint; begin  if x> y then max: =x else max: =y; end; var k : longint; s : string; begin  readln(s);   while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin    k: =k+1;

    delete(s,max(max(pos('.',s),pos('! ',('? ',); end;   writeln(k); end.