Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторный практикум по QBasic.doc
Скачиваний:
4
Добавлен:
29.04.2019
Размер:
5.12 Mб
Скачать

Контрольні запитання

  1. Які ви знаєте способи запуску QBASIC ?

  2. Назвіть пункти головного меню QBASIC.

  3. Як ввести та відредагувати програму?

  4. Назвіть призначення функціональних клавіш редактора QBASIC.

  5. Як запустити програму на виконання та переглянути її результат?

  6. Як зберегти програму у вигляді файла на диску?

  7. Як вийти з середовища QBASIC?

Завдання

Знайомство з середовищем QBASIC.

  1. Запустіть QBASIC та ознайомтесь з його загальним виглядом .

  2. Вивчіть пункти головного меню QBASIC.

  3. Створіть новий файл та введіть наступний текст програми:

PRINT “ЦЕ МОЯ ПЕРША ПРОГРАМА”

  1. Запустіть програму на виконання та перегляньте її результат користуючись:

  • головним меню;

  • спеціальними клавішами.

  1. Збережіть створений вами файл під новим іменем на диску А:.

  2. Вийдіть з середовища QBASIC.

Лабораторна робота № 4

Комбінування циклів та розгалужень

Мета роботи: оволодіння практичними навичками розробки, програмування обчислювального процесу розгалуженої та циклічної структур.

Теоретична частина

Розгалужена структура алгоритму

В алгоритмі розгалуженої структури передбачено розгалуження послідовності дій в залежності від результату виконання будь-якої умови. Відрізняють повну та скорочену форми розгалуженої структури.

Приклад повної форми: скласти алгоритм обчислення значення функції

ax2 +bx+c , якщо x<0

y=

sin(ecx +ab) , якщо х >=0,

де x, a, b, c – будь-які дійсні числа.

На рис. 4.1. подана блок-схема повної форми розгалуженої структури.

Приклад скороченої форми: дані дійсні числа p та t. Якщо їх сума невід’ємна, то змінити їх знаки на протилежні, інакше залишити числа без змін.

На рис. 4.2. подана блок-схема скороченої форми розгалуженої структури.

Умовний оператор if

Найпростіша форма умовного оператора IF виглядає наступним чином:

IF умова THEN оператори,

де умова - вираз, який може мати тільки одне з двох значеннь «так» чи «ні»;

Рис. 4.1. Блок-схема повної форми розгалуженої структури

Рис. 4.2. Блок-схема скороченої форми розгалуженої структури

оператори — один чи більше операторів, які виконуються, якщо умова істина; оператори розділяються двокрапкою і повинні обов’язково бути в одному командному рядку.

Приклад 1:

REM Програма1

IF YourAge > 17 THEN PRINT «Ви - Дорослий»

Умова, що використовується у цьому прикладі, є простим логічним виразом, так як включає тільки одну операцію порівняння.

Оператор IF ...THEN... ELSE – оператор управління, що використовує умовне розгалуження операцій, які базуються на оцінці логічного виразу. Вираз має значення “так” чи “ні”.

Такий тип використання оператору IF можна записати в лінійній або блочній формі.

Лінійна форма:

IF умова THEN оператори 1 ELSE оператори 2,

де умова - логічний вираз;

оператори 1 — один чи більше операторів, які виконуються, якщо умова істинна;

оператори 2 — один чи більше операторів, які виконуються, якщо умова хибна.

Блочна форма:

IF умова THEN

оператори 1

ELSE

оператори 2

END IF

Приклад 2:

REM Програма2

CLS

INPUT «Введіть будь-яке число»; N

IF N >=0 THEN PRINT «Це число - додатнє»

ELSE PRINT «Це число – від’ємне»

END IF

END

Оператор IF дуже корисний в QBASIC: у сполученні з логічними операціями він розширює можливості програми, дозволяючи організовувати дворівневі перевірки. Оператор IF може бути використаний і для створення багаторівневих перевірок, що дозволяє враховувати більше можливих варіантів.

Багаторівнева перевірка може бути організована двома способами:

  • з використанням вкладених операторів IF;

  • з використанням багаторівневих побудов операторів IF.

Схема вкладених операторів IF має наступний формат:

IF умова1 THEN IF умова 2 THEN оператори,

з якого видно, як один оператор IF знаходиться всередині другого такого ж оператору. Оператори, що слідують за ключовим словом THEN, виконуються програмою, якщо дві умови мають значення «істина». якщо умова1 - «істина», QBASIC перевіряє умову2, якщо умова1 - «неправда», управління буде передано на наступний оператор без перевірки умови2. Ви можете також використовувати ELSE разом із операторами IF:

IF умова1 THEN IF умова 2 THEN оператори1 ELSE оператори2.

Оператор такого типу повинен бути записаний в один рядок, інакше QBASIC його не зрозуміє. Вкладені структури з ELSE можуть бути доволі складними. В цьому випадку використання багаторівневої структури замість вкладених операторів IF спростить програму. Багаторівнева структура виглядає наступним чином:

IF умова1 THEN блок операторів – 1

ELSE

IF умова 2 THEN блок операторів – 2

ELSE блок операторів - n

END IF

END IF,

де умова1, умова2 – логічні вирази;

блок операторів-1, блок операторів-2, блок операторів-n – один чи більше рядків операторів.