5. установіть відповідність між науковими відкриттями та прізвищами вчених, яким вони належать. а) перший механічний пристрій, що виконував чотири арифметичні дії, сконструював б) склад і призначення частин (функціональних елементів) автоматичного обчислювального пристрою вперше сформулював в) принципи, згідно з якими функціонує більшість сучасних комп’ютерів, вперше описав г) першу серійну обчислювальну машину, що виконувала дві арифметичні дії, створив д) перші програми для різницевої автоматичної машини створив перший у світі програміст 1) блез паскаль 2) джон фон нейман 3) чарльз беббідж 4) ада лавлейс 5) готфрід вільгельм лейбніц 6. установіть відповідність між назвами властивостей алгоритмів та їхніми описами. а) визначеність або детермінованість б) скінченність в) дискретність г) результативність д) масовість 1) означає, що виконання алгоритму зводиться до виконання окремих дій у певній послідовності; причому кожна команда алгоритму повинна виконуватися за скінченний інтервал часу 2) означає, що для заданого набору значень початкових (вхідних) даних алгоритм однозначно визначає порядок дій виконавця та результат цих дій 3) означає, що алгоритм може бути застосований до цілого класу однотипних , для яких спільними є умова, хід розв’язування та які відрізняються тільки початко вими даними 4) означає, що виконання алгоритму завершиться після скінченної кількості кроків і за скінченний час при будь-яких допустимих значеннях початкових даних 5) означає, що після завершення виконання алгоритму обов’язково одержуються результати, які відпові поставленій меті 7. установіть відповідність між типами програмного забезпечення комп’ютера та назвами програм. а) програми для роботи з текстовими документами б) програми для перегляду веб-документів в) програми спеціального призначення г) інструментальні програми д) програми для роботи з графікою 1) paint 2) 1c-бухгалтерія 3) ms word 4) internet explorer 5) codeblocks 8. установіть відповідність між означеннями властивостей алгоритмів та їхніми назвами. а) після завершення виконання алгоритму обов’язково одержуються результати, які відпові поставленій меті б) алгоритм може бути застосований до цілого класу однотипних , для яких спільними є умова, хід розв’язування та які відрізняються тільки початковими даними в) виконання алгоритму завершиться після скінченної кількості кроків і за скінченний час при будь-яких допустимих значеннях початкових даних г) для заданого набору значень початкових (вхідних) даних алгоритм однозначно визначає порядок дій виконавця та результат цих дій д) виконання алгоритму зводиться до виконання окремих дій у певній послідовності, причому кожна команда алгоритму повинна виконуватися за скінченний інтервал часу 1) масовість 2) скінченність 3) визначеність або детермінованість 4) результативність 5) дискретність 9. установіть відповідність між описом принтерів та їхніми назвами. a) принтери, принцип дії яких полягає в створенні зображення за дуже малих крапель спеціальних чорнил, що виштовхуються з друкуючої головки на поверхню паперу або плівки, називаються б) монохромні принтери, що використовуються для друку етикеток, ярликів, чеків, штрих-кодів на складах або в магазинах, білетів для транспортних компаній, чеків у переносних касових апаратах тощо, називаються в) принтери, у яких використовується принцип дії на основі електризації малих частинок порошкоподібної фарби (тонера), за якої і створюється зображення на поверхні паперу або плівки, називаються г) принтери, у яких низька якість друку, відносно мала швидкість друку, не можна якісно передавати відтінки кольорів, високий рівень шуму, називаються д) принтери, які використовуються для друку креслень, ескізів, плакатів та інших зображень великих розмірів, називаються 1) лазерні 2) струменеві 3) термічні 4) плотери 5) матричні 10. встановіть відповідність між розширенням файлу і його типом. а) .txt б) .exe в) .jpg г) .mp3 д) .avi 1) графічний 2) текстовий 3) музичний 4) виконуваний 5) відео 11. установіть відповідність між типами принтерів та їхнім описом. а) пристрої введення даних б) пристрої внутрішньої пам’яті в) пристрої виведення даних г) пристрої зовнішньої пам’яті д) мультимедійне обладнання 1) оперативна, постійна, напівпостійна пам’ять 2) клавіатура, миша, маніпулятори, сканер 3) гнучкі та жорсткі магнітні диски, сd- та dvd-диски 4) звукові та відеокарти, цифрові фото- та відеокамери 5) принтер, гучномовці, навушники, плотер
const
nDay:array[1..12] of integer=(31,28,31,30,31,30,31,31,30,31,30,31);
type
Date=record
Day,Month,Year:integer
end;
function DOW(Dat:Date):integer;
// день недели по дате. 0-Вс. 1-Пн, 7-Сб
var
a,y,m:integer;
begin
With Dat do begin
a:=(14 - month) div 12;
y:=Year-a;
m:=month+12*a-2;
DOW:=(7000+(day+y+y div 4-y div 100+y div 400+(31*m) div 12)) mod 7
end
end;
procedure DMY2Date(d,m,y:integer; var data:Date);
// Преобразует к дате заданные день, месяц и год
begin
data.Day:=d; data.Month:=m; data.Year:=y
end;
procedure LastDays(month,year:integer; var Wd,Fr:Date);
// даты последней среды (Wd) и пятницы (Fr) для месяца в году }
var
LastDay:Date;
n:integer;
begin
n:=nDay[month];
if (month=2) and (year mod 4 = 0) then Inc(n);
DMY2Date(n,month,year,LastDay);
n:=DOW(LastDay); // номер последнего дня недели
Wd.Month:=month; Wd.Year:=year;
if n<3 then Wd.Day:=LastDay.Day-(n+4)
else
if n=3 then Wd.Day:=LastDay.Day
else Wd.Day:=LastDay.Day+3-n;
Fr.Month:=month; Fr.Year:=year;
if n<5 then Fr.Day:=LastDay.Day-(n+2)
else
if n=3 then Fr.Day:=LastDay.Day
else Fr.Day:=LastDay.Day-1
end;
var
Wd,Fr:Date;
ff,mf:Text;
m:integer;
begin
Assign(ff,'father.txt'); Rewrite(ff);
Assign(mf,'mother.txt'); Rewrite(mf);
// Сентябрь-декабрь 2015 года
for m:=9 to 12 do begin
LastDays(m,2015,Wd,Fr);
if Odd(Wd.Day) then Writeln(mf,Wd.Day,'.',m,'.2015 - 1 класс')
else Writeln(ff,Wd.Day,'.',m,'.2015 - 1 класс');
if Odd(Fr.Day) then Writeln(mf,Fr.Day,'.',m,'.2015 - 5 класс')
else Writeln(ff,Fr.Day,'.',m,'.2015 - 5 класс')
end;
// Январь - май 2016 года
for m:=1 to 5 do begin
LastDays(m,2016,Wd,Fr);
if Odd(Wd.Day) then Writeln(mf,Wd.Day,'.',m,'.2016 - 1 класс')
else Writeln(ff,Wd.Day,'.',m,'.2016 - 1 класс');
if Odd(Fr.Day) then Writeln(mf,Fr.Day,'.',m,'.2016 - 5 класс')
else Writeln(ff,Fr.Day,'.',m,'.2016 - 5 класс')
end;
Close(ff); Close(mf)
end.
Содержимое выходных файлов:
father.txt
30.9.2015 - 1 класс
28.10.2015 - 1 класс
30.10.2015 - 5 класс
30.12.2015 - 1 класс
24.2.2016 - 1 класс
26.2.2016 - 5 класс
30.3.2016 - 1 класс
mother.txt
25.9.2015 - 5 класс
25.11.2015 - 1 класс
27.11.2015 - 5 класс
25.12.2015 - 5 класс
27.1.2016 - 1 класс
29.1.2016 - 5 класс
25.3.2016 - 5 класс
27.4.2016 - 1 класс
29.4.2016 - 5 класс
25.5.2016 - 1 класс
27.5.2016 - 5 класс
n=5;
Var
ar:array[1..n] of integer;
ar2:array[1..n] of integer;
i,k:integer;
function prost(a:integer):boolean;
var i:integer;
b:boolean;
begin
b:=true;
for i:=2 to a div 2 do
if a mod i=0 then
begin;
b:=false;
break;
end;
if a=1 then b:=false;
prost:=b;
end;
begin;
randomize;
k:=0;
for i:=1 to n do
begin;
ar[i]:=random(101);
write(ar[i]:4);
end;
writeln;
for i:=1 to n do
if prost(ar[i]) then
begin;
inc(k);
ar2[k]:=ar[i];
write(ar2[k]:4);
end;
end.