21: определить есть ли среди чисел массива числа, делящиеся (кратны) 3, количество элементов до 1000 на промежутке [1000; 3000] 2: определить есть ли среди чисел массива числа, которые при делении остаток 8, количество элементов до 1000 на промежутке [1000; 3000] , надо =3 уже есть некая программа но она чуть непраильна наверно. program qq; const k = 1000; var a: array[1..k] of integer; i, : integer; begin randomize; k: =0; for i: =1 to k do begin a[i]: =random(2001)+1000; write(a[i]: 1); end; if (a[i] mod 3) = 0 then k: =k+1; writeln('количество элемениов кратных 3 - ', k); readln; end.

1.

program qq;

const n = 10;

var a: array[1..n] of integer;

i,k: integer;

begin

randomize;

for i: =1 to n do

begin

a[i]: =random(2001)+1000;

write(a[i],' ');

end;

writeln;

k: =0;

for i: =1 to n do

if a[i] mod 3 = 0 then k: =k+1;

writeln('количество элемениов кратных 3 - ', k);

readln;

end.

пример:

2296 2042 2463 2049 1081 2156 2977 1633 1054 1425  

количество элемениов кратных 3 - 3

2. определяется количество чисел, которые при делении на 10 остаток 8.

program qq;

const n = 10;

var a: array[1..n] of integer;

i,k: integer;

begin

randomize;

for i: =1 to n do

begin

a[i]: =random(2001)+1000;

write(a[i],' ');

end;

writeln;

k: =0;

for i: =1 to n do

if a[i] mod 10 = 8 then k: =k+1;

writeln('k = ', k);

readln;

end.

пример:

1887 1878 2568 1936 2508 2788 2050 1569 2906 1782  

k = 4

Program n1; function isprost(x: integer): boolean; var i: integer; begin if x< 2 then isprost: =false else begin isprost: =true; for i : = 2 to round(sqrt(x)) do if x mod i = 0 then isprost: =false; end; end; function islow(x: integer): boolean; var n1,n2: integer; begin islow: =false; n2: =x mod 10; x: =x div 10; n1: =x mod 10; x: =x div 10; while (n1> n2) and (x< > 0) do begin n2: =n1; n1: =x mod 10; x: =x div 10; end; if n1> n2 then islow: =true; end; var k,n,i,f: integer; begin readln(k,n); f: =-1; for i: =k to n do if isprost(i) and islow(i) then begin write(i,' '); f: =1; end; if f=-1 then write(0); end.

1) э то кнопки, иконки, поля ввода. кнопки нажимаются, в поля вводится текст.2) в windows -строка заголовка – верхняя строка окна, в которой находится имя программы или имя окна;   кнопка сворачивания окна;   кнопка восстановления окна  кнопка закрытия окна  кнопка системного меню  строка меню  панель инструментов  полосы прокрутки  рабочее поле  строка состояния  рамка окна.  вроде все.3)  1. system 32.  рабочий стол. 2. мой компьютер, мои документы, корзина, сетевые окружения(сеть) и объекты windows. 4)  1. иконки, панель , папки 2. ярлык это ссылка на файл, который может находиться где угодно на пк, а значок это сам файл 3. на панели располагается запущенные приложения, панель быстрого доступа, . 4. папка "мой компьютер"5)  ярлык дает ссылку на значок,который запускает. 6) пуск,панель ,программы в фоновом режиме, или все, что ты туда поместишь.