Задание 1. Подобрать АИС по каждому классификационному признаку:

. Преподаватель, объяснив тему, проводит тестирование студентов.
2. Начальник цеха каждый день ведет планерку с мастерами.
3. Инженер-конструктор разрабатывает новое изделие.
4. Специальные органы восстанавливают утраченные документы.
5. Работники автозавода внедряют новую модель автомобиля на базе своих автомобилей.
6. Специалисты космического центра управляют процессом запуска кораблей.
7. В библиотеке ведется алфавитный каталог.
8. Работники фирмы проводят исследование своих моделей в различных ситуациях.
9. Группа ученых проводит сложные научные исследования.
10. Водители рассматривают ситуации по правилам дорожного движения.
11. Работники предприятия управляют станками с ЧПУ.
12. Работник склада ведет учет прихода и расхода материалов

карандаш — инструмент в виде стержня, изготавливаемого из пишущего материала (угля, графита, сухих красок и т. п.) применяемый для письма, рисования, черчения.

1)

var

a: array [1..5,1..10] of integer;

i,j,p: integer;

begin

for i: =1 to 5 do 

begin

for j: =1 to 10 do

begin

a[i,j]: =random(50)+1;

write(a[i,j]: 3);

end;

writeln;

end;

writeln('меняем 1 и последнюю строки');

for j: =1 to 10 do

begin

p: =a[1,j];

a[1,j]: =a[5,j];

a[5,j]: =p;

end;

for i: =1 to 5 do 

begin

for j: =1 to 10 do

write(a[i,j]: 3);

writeln;

end;

end.

2)

var a: array [1..5, 1..10] of integer; i, j: integer; p: real;

begin for i : = 1 to 5 do begin for j : = 1 to 10 do begin a[i, j] : = random(50) + 1; write(a[i, j]: 3); end; writeln; end; writeln('произведения элементов строк'); for i : = 1 to 5 do begin p : = 1; for j : = 1 to 10 do p : = p * a[i, j]; writeln(p: 25: 0); end; end.

1)  2, 5, 4, 7, 8, 9,  16,  11, 32

2           5

4           7

8           9

16         11

32

*2           +2

чётное порядковое число умножается на 2

нечётное порядковое число увеличивается на 2

2) 3, 8, 15,  24,  35, 48,  63, 80

3

3+5=8

8+7=15

15+9=24

24+11=35

35+13=48

48+15=63

63+17=80

(к предыдущему ответу прибавляется по порядку идущее нечётное число)