1. Етапи створення нових засобів і методів опрацювання даних, що спричинили суттєві зміни в суспільстві, тобто змінили іб виробництва, стиль життя, систему цінностей, називають етапом суспільства
інформаційним етапом розвитком суспільства
інформаційною революцією
2. Нова історична фаза розвитку цивілізації, у якій головними продуктами виробництва є дані й знання, *
етап цивілізації
інформаційна революція
інформаційне суспільство
3. Уміння цілеспрямовано працювати з даними й використовувати інформаційно-комунікаційні технології, сучасні технічні засоби та методи для їх отримання, опирацювання й передавання, це – *
компетентність
інформатичні вміння
інформаційна культура
4. Здатність людини орієнтуватися в інформаційному просторі, оперувати даними на основі використання сучасних інформаційно-комунікаційних технологій відповідно до потреб ринку праці для ефективного використання професійних обов’язків, це *
інформаційна культура
інформатична компетентність
вміння вижити
5. Наука, що вивчає структуру й загальні властивості даних, а також методи й засоби їх створення, пошуку, збереження, опрацювання, передавання та використання в різних сферах діяльності людини, –
кібернетика
інформатика
хакерство
6. Скільки етапів розвитку пройшли інформаційні технології *
6
7
8
9
7. Розрізняють таку класифікацію інформаційних технологій: *
глобальні
маштабні
базові
конкретні
точні
8. Які ви знаєте інформаційні процеси? *
збирання
пошук
опрацювання
подання
зберігання
передавання
використання
захист
знаходження
9. Сукупність пристроїв і програм, призначених для зберігання, опрацювання, подання та передавання даних різного типу, називають *
інформаційною системою
пошуковою системою
інформаційним процесом
10. Результати інтелектуальної діяльності та засоби індивідуалізації, які охороняються законом, це – *
авторське право
інтелектуальне право
інтелектуальна власність
11. Етика, пов’язана з розглядом технічних, моральних, юридичних, соціальних , політичних і філософських питань називається
інформаційною етикою
комп’ютерною етикою
моральною етикою
const n=100;
var ar:array of array of integer;
ars:array of array of string;
i:integer;
procedure complection(var ar:array of array of integer;var ars:array of array of string);
var
i,j:integer;
begin;
for i:=1 to n do
begin;
for j:=1 to n do
begin;
ar[i,j]:=random(9);
str(ar[i,j],ars[i,j]);
end;
end;
end;
procedure burning(ars:array of array of string);
var
i,j:integer;
t:text;
begin;
assign(t,'text.txt');
rewrite(t);
for i:=1 to n do
begin;
writeln(t,' ');
for j:=1 to n do
write(t,ars[i,j],' ');
end;
end;
begin;
randomize;
setlength(ar,n+1);
setlength(ars,n+1);
for i:=1 to n do
begin;
setlength(ar[i],n+1);
setlength(ars[i],n+1);
end;
complection(ar,ars);
burning(ars);
end.
const
MAX_SIZE = 100;
var
size, n: integer;
stack: array[1..MAX_SIZE] of integer;
procedure push(a: integer);
begin
inc(size);
stack[size] := a;
end;
procedure view;
var
i: integer;
begin
for i := 1 to size do
write(stack[i], ' ');
writeln;
end;
Для очереди:
const
MAX_SIZE = 100;
var
head, tail: integer;
queue: array[1..MAX_SIZE] of integer;
procedure push(a: integer);
begin
queue[tail] := a;
inc(tail);
end;
procedure view;
var
i: integer;
begin
for i := head to tail - 1 do
write(queue[i], ' ');
writeln;
end;
И стек и очередь реализованы с массива. Нужно следить, чтобы размер структуры не был больше размера массива