1. Назовите внешние устройства ПК.
2. Назовите внутренние устройства ПК.
3. Для чего предназначен процессор и каковы его характеристики?
4. Что такое видеоконтроллер?
5. ОЗУ и ПЗУ – это обязательные устройства?
6. В чём отличие ОЗУ и ПЗУ?
7. Что такое принтеры, каких типов они бывают?
8. Опишите принцип печати матричных принтеров.
9. Опишите принцип печати струйных принтеров.
10. Какой принцип печати используется в лазерных принтерах.
11. Для чего нужны дисководы?
12. Для чего нужны винчестеры?
13. Какими характеристиками отличаются друг от друга винчестеры?
14. Что такое модем и факс-модем?
15. Каков принцип работы плоттера?
16. На какие основные классы принято разделять ПО?
17. Что включает в себя системное ПО?
18. Какие программы входят в прикладное ПО?
19. Для чего нужна операционная система ПК?
20. Что такое драйверы и для чего они используются?
21. Что такое утилиты и какие типы утилит чаще всего используются?
22. Что включает в себя система программирования?
23. Какие прикладные программы наиболее широко распространены?
24. Для чего применяются текстовые редакторы, приведите пример?
25. Для чего используются табличные процессоры, приведите пример?
26. Для чего предназначены издательские системы, приведите пример?
27. Для чего нужны программы подготовки презентаций, приведите пример?
28. Для чего служат графические редакторы, приведите пример?
29. Что позволяют делать на ПК программы для анимации и для создания компьютерного видео, приведите примеры?
30. Для чего предназначены бухгалтерские программы и правовые БД, приведите примеры?
31. Что позволяют делать на ПК персональные информационные менеджеры и программы планирования, приведите примеры?
32. Что позволяют делать на ПК программы распознавания символов и программы-переводчики, приведите примеры?
33. Для чего применяются СУБД и САПР, приведите примеры
var a:array [1..20] of integer;
i:integer;
begin
randomize;
for i:=1 to 20 do begin
a[i]:=random(19-(-10)+1)+-10;
write (a[i],' ');
end;
end.
Задача №2
var a:array [1..20] of integer;
i:integer;
begin
writeln('Введите числа в интервале [-20;29]');
for i:=1 to 10 do read(a[i]);
for i:=1 to 10 do
if (a[i]>-29) and (a[i]<20) then write(a[i],' ');
end.
Задача №3
var a:array [1..20] of integer;
i,sum:integer;
begin
randomize;
sum:=0;
for i:=1 to 20 do
begin
a[i]:=random(19-(-10)+1)+-10;
write (a[i],' ');
if a[i]>0 then sum:=sum+1;
end;
writeln('Количество положительных элементов массива = ', sum);
end.
Задача №4
var a:array [1..20] of integer;
i:integer;
begin
randomize;
for i:=1 to 20 do
begin
a[i]:=random(19-(-10)+1)+-10;
if a[i]<0 then a[i]:=0;
write (a[i],' ');
end;
end.
Задача №5
var a:array [1..20] of integer;
i,sum:integer;
begin
randomize;
sum:=0;
for i:=1 to 20 do
begin
a[i]:=random(19-(-10)+1)+-10;
write (a[i],' ');
if a[i]>0 then sum:=sum+a[i];
end;
writeln('Сумма положительных элементов массива = ', sum);
end.
begin
var a:=ArrRandom(20,-10,19);
a.Println(','); // 1
var b:=ReadArrInteger('Введите 10 целых чисел',10); // 2
Writeln('Количество положительных элементов ',
a.Where(x->x>0).Count); // 3
for var i:=0 to 19 do
if a[i]<0 then a[i]:=0;
Writeln('Массив А после замены отрицательных'); a.Println(','); //4
Writeln('Сумма положительных элементов ',
a.Where(x->x>0).Sum) // 5
end.
Тестовое решение:
14,8,9,-5,6,3,3,-10,-8,18,7,13,2,17,-1,0,4,-3,8,-8
Введите 10 целых чисел -5 0 13 -7 -14 11 8 19 -3 -1
Количество положительных элементов 13
Массив А после замены отрицательных
14,8,9,0,6,3,3,0,0,18,7,13,2,17,0,0,4,0,8,0
Сумма положительных элементов 112