Варіант 17

Begin

Б

А

Варіант 16

End.

End

CaseN of

Begin

writeln('введіть позначку відмінка: ');

readln(N);

'н','Н': writeln('який?');

'р','Р': writeln('якого?');

'д','Д': writeln('якому?');

'з','З': writeln('якого?');

'о','О': writeln('яким?');

'м','М': writeln('на якому?');

'к','К': writeln('який');

16. Завдання на створення запиту СУБД MS Access.

1) Відкриємо файл бази даних Підприємство.mdb.

2) Додамо таблицю Кадри у вікно конструктора запитів.

3) Перетягнемо поля Прізвище, Ім’я, По батькові, Дата народження в нижню частину блан-

ка запиту (рис. а).

4) Для відображення таблиці з даними про співробітників, які народилисьне раніше, ніж 01.01.1978, на значення поля Дата народження встановимо умову відбору >=#01.01.1978#у рядку Условие отбора (Умова відбору).

5) Збережемо запит.

У режимі перегляду таблиці запит

має вигляд, як показано на рис б.

17. Для виконання завдання можна скористатися такими посиланнями:

http://domicad.net.ua/index.php — інтернет-магазин «Твій дім • і сад+», де можна

придбати найкраще насіння й саджанці України, в тому числі й полуниці.

• http://dm--sad.uaprom.net/product_list/group_434273 — інформація про сорти

полуниці та її вартість.

• http://domicad.net.ua/index.php?cPath=45&sort=products_sort_order&page=2 — ціна

на полуницю Королева Єлизавета ІІ (10 саджанців — 169 грн).

• http://privatbank.ua/info/index2.stm?fileName=7u.html — адреса, реквізити «При-

ватбанку».

18. Задача на програмування мовою Delphi.

З палітри компонентів (вкладка Standart) вибираємо компоненти Button, Edit.

В Інспекторі об’єктів встановимо для об’єкта Button1 значення Caption — Результат, для

об’єктів Edit видалимо значення якості Text.

unit Unit1;

interface

uses

Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls;

type

{ TForm1 }

TForm1 = class(TForm)

Button1: TButton;

Edit1: TEdit;

Edit2: TEdit;

Edit3: TEdit;

procedure Button1Click(Sender: TObject);

private { private declarations }

public { public declarations }

end;

var Form1: TForm1;

implementation {$R *.dfm} { TForm1 }

procedure TForm1.Button1Click(Sender: TObject);

var a, b: real;

a:= StrToFloat(Edit1.Text);

b:= StrToFloat(Edit3.Text);

if Edit2.Text='+' then Form1.Caption:= FloatToStr(a+b);

if Edit2.Text='-' then Form1.Caption:= FloatToStr(a–b);

if Edit2.Text='*' then Form1.Caption:= FloatToStr(a*b);

if Edit2.Text='/' then

if b=0 then Form1.Caption:= 'delit na 0 nelza'

else Form1.Caption:= FloatToStr(a/b);

end;

end.

16. Завдання на обчислення в табличному процесорі MS Excel.

1) Відкриємо файл електронної таблиці Спортсмени.xls.

2) Для обчислення середнього значення кількості спортсменів у кожній із держав встановимо

курсор у клітинку D4 та клацнемо на кнопку Σ стандартної панелі інструментів.

3) Виконаємо команду спадного меню Середнє, вказавши діапазон обчислення середнього

значення B4: С4.

4) Скопіюємо формулу =AVERAGE(B4: С4) у клітинки діапазону D5: D10 із використанням

маркера автозаповнення.

5) Збережемо документ Спортсмени.xls.

17. Для виконання завдання можна скористатися такими посиланнями:

• http://osvita.ua/test/test_office/ — інформація про Центри тестування.

• http://www.testportal.gov.ua/ — сайт Українського центру оцінювання якості освіти

(УЦОЯО), де містяться посилання на всі регіональні центри оцінювання якості освіти,

специфікації тестів.

• http://osvita.ua/test/answers/ — приклади тестів за минулі роки.

• http://osvita.ua/test/zno_online/ — проходження пробного онлайн тестування.

• http://www.abiturient.ua/ — сервіс онлайн тестування «Абітурієнт».

• http://test.svitosvit.ua/default.aspx?id=root — тестування на сайті «СвітОсвіт».

• http://ukrainetest.com.ua/ — пробні тести ЗНО.

• http://crimeatest.org.ua/index.php?option=com_content&view=article&id=17&Itemi

d=74 — календар абітурієнта-2012.

18. Задача на програмування мовою Pascal.

Дано: буква позначення відмінка.

Знайти: питання іменника в даному відмінку.

Розв’язання. Див. В-15, № 18.

program zadacha18_17;

var N: char;

Дата добавления: 2015-05-26