Нужно решить данные . буду признателен. 1. составьте программу ввода и вывода массива: 3, 4, -9, 8, 1, -6, 2, -5, -1, 7, 5, 9. 2. составьте блок-схему алгоритма и программу вычисления в массиве а(10) количества отрицательных эллементов. 3. составьте программу вычисления в массиве в(8) суммы четных элементов.

1)ввод чисел в массив: program vvod_mass; vara: array[1..12] of integer; i: integer; begin for i: =1 to 12 do begin write('a[', i, ']='); readln(a[i]); end; end.2)program otric; vara: array[1..10] of integer; i,n: integer; begin randomize; for i: =1 to 10 do begin a[i]: =-10+random(21); writeln(a[i]); end; for i: =1 to 10 do if a[i]< 0 then inc(n); write('кол-во отрицательных чисел массива: ', n); end.3)program chetniy; vara: array[1..8] of integer; i,n: integer; begin randomize; for i: =1 to 8 do begin a[i]: =-10+random(21); writeln(a[i]); end; for i: =1 to 8 do if a[i] mod 2 = 0 then inc(n); write('кол-во отрицательных чисел массива: ', n); end.

Var a,b,i,nod: integer begin a: =-1; b: =-1; //ввод первого числа writeln('введите первое число'); while a< 0 do begin readln(a); if a< 0 then writeln('ввод , повторите ввод первого числа'); end; //ввод второго числа writeln('введите второе число'); while b< 0 do begin readln(b); if b< 0 then writeln('ввод , повторите ввод второго числа'); end; //определение минимального числа if a> b then i: =b else i: =a; //перебор чисел от минимального до 0 (т.к. нод не может быть больше минимального числа) while nod=0 do begin i: =i-1; if (a mod i = 0) and (b mod i = 0) then nod: =i; end; //вывод нод writeln('нод ', a,' и ', b, ' = ', nod); end.

ответ:

1) построим таблицу истинности  

f = ¬b

b   f

0     1

1     0

0     1

1     0

таблица не соответствует с той, которая в условии. значит, этот вариант нам не подходит

2) f = b. этот вариант нам подходит, потому что значение f и b . но проверим и остальные варианты

3) не подходит, т.к. по условию сказано, что переменные связаны

4) посмотрим таблицу истинности f = a∧b

a   b   f

0   0   0

мы уже видим, что наши таблицы не , поэтому дальше этот вариант можно и ре рассматривать.

ответ: 2

подробнее - на -

объяснение: