Ввести число n. вывести количество его простых делителей. в

uses crt; vari,j,s,n,k: integer; beginclrscr; writeln('vvedite chislo'); readln(n); for i: =2 to n-1 dobegink: =0; for j: =2 to i-1 doif i mod j=0 then k: =1; if (k=0)and(n mod i=0)thenbeginwrite(i,' '); s: =s+1; end; end; writeln; writeln('chislo delitelii =',s); readln; end.

Var   a: array [1..120] of real;   i, res: integer; begin   randomize();   res : = 0;     for i : = 1 to 120 do   begin       a[i] : = random(101);       writeln('a[', i, '] => ', a[i]);   end;   writeln();     for i : = 1 to 120 do       if abs(a[i]) > 17 then           inc(res);     writeln(res); end. =================== var   c: array [1..20] of integer;   i, res: integer; begin   randomize();   res : = 0;     for i : = 1 to 20 do   begin       c[i] : = random(101);       writeln('c[', i, '] => ', c[i]);   end;   writeln();     for i : = 1 to 20 do       if c[i] mod 2 = 1 then           c[i] : = -1 * c[i];     writeln('new array: ');   for i : = 1 to 20 do   begin       writeln('c[', i, '] => ', c[i]);   end; end.

1 - True/False

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

3 - Конъюнкция

4 - X И Y И Z

5 - OR

6 - 1. Инверсия;

2. Конъюнкция;

3. Дизъюнкция;

4. Импликация;

5. Эквивалентность.

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

8 - Импликация

9 - логическая операция, которая объединяет два высказывания в одно новое, которое будет являться истинным тогда и только тогда, когда оба исходных высказывания истинны

10 -  Конъюнкция

11 - ?

12 - ?

Объяснение: