Отметьте, что из нижеперечисленного надо выполнить для построения таблицы истинности? 1Установить последовательность вычислений логических операций с учётом скобок и приоритетов.
2Подсчитать число символов в выражении.
3Определить число столбцов в таблице
4 Определить число столбцов в таблице.
5Определить число строк в таблице.
6Записать в таблицу наборы входных переменных.
7Записать в таблицу случайный набор нулей и единиц.
8 Подсчитать общее число логических операций в выражении.
9Подсчитать число переменных в логическом выражении.
10 Заполнить шапку таблицы.
11Определить цвет строк в таблице.

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.

program xxx;   var a, b, min : integer; begin  write('введите число а=');  

    readln(a);

  min: =10;   while a < > 0 do      begin            b: = a mod 10;             if b < min then min: =b;             a: = a div 10      end;     writeln('минимальная цифра = ', min);   readlnend.

в секунду передается 512кбит=512/8кбайт=64кбайт

за четыре минуты передалось 4*60*64=15360кбайт

в одном мбайте 1024 кбайт ⇒15360кбайт=15360/1024мбайт=15мегабайт

ответ: 15 мегабайт

1, 2, 5, 9 -однозначные числа

10, 25, 40, 41 - двузначные числа

1, 2, 11, 29 - простые числа