Задание #1:
3) Компьютерная мышь
Задание #2
2) Графический 3) SILK-интерфейс 4) Командный
Задание #3
1) Комбинации символов
Задание #4
1) Пользовательский интерфейс
Задание #5
Знание
Задание #6
1.B
2.D
3.C
Задание #7
1) WIMP-интерфейс
Задание #8
2) Окно 4) Манипулятор
Задание #9
2) Голосовой
Задание #10
4) SILK
2 часть теста
Задание 1
4) Панели задач
Задание 2
2) Ярлык
Задание 3
1) Главное меню
Задание 4
?
Задание 5
2) Рабочий стол
Задание 6
2) Окно
Задание 7
Задание 8
2) Меню
Задание 9
3) WIMP
Задание 10
2) Диалоговые окна
Program main;
Var A, B: array [1..100] of integer;
k, n, i: byte;
Begin
i:=1;
Readln (n);
For k:=1 to n do
Readln(A[k]);
For k:=1 to n do
If A[k]<0 then
Begin
B[i]:=A[k];
i:=i+1;
End;
For k:=1 to n do
If A[k]=0 then
Begin
B[i]:=A[k];
i:=i+1;
End;
For k:=1 to n do
If A[k]>0 then
Begin
B[i]:=A[k];
i:=i+1;
End;
For i:=1 to n do
Writeln (B[i]);
Readln;
End.
Ответ а: 1001
ответ б: 1130
ответ в: 03732