Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ПР14-15.doc
Скачиваний:
3
Добавлен:
04.09.2019
Размер:
81.41 Кб
Скачать
    1. Довідки по структурі і операторам Pascal- програми

При виконанні цієї роботи рекомендується використати програму із следущей структурою:

Program <имя_программы>;

{------------розділ определенияпеременных--------------}

Var

<имя_переменной, имя_переменной, .> : <mun _переменных>;

<имя_переменной, имя_переменной, .> : <mun _переменных>;

……………………………….

{-----------------------------блок операторів-----------------}

Begin

Writeln(«Повідомлення об начле роботи рограммы»);

{--введення даних--}

Writeln(«Введіть».);

Riadln (<список_переменных>;

{--оператори обчислення значень--}

…………………..

{--вывод_результатов--}

Writeln(«Повідомлення про виведення результатів»);

Writeln(<список_переменных>);

Writeln(<список_переменных>);

………………………………………

End.

Різновиди даних цілого типу дані в таблиці 1.2

Таблиця 1.2

Цілий тип

Діапазон значень

Розмір пам'яті

Shortint

-128 … 127

1 байт

Integer

-32768 … 32767

2 байта

Longint

-2147483648 … 2147483647

4 байта

Byte

0 … 255

1 байт

Word

0 … 65535

2 байта

Для виведення пояснюючого тексту(підказок операторові ЕОМ) можна використати оператори типу :

Writeln(«Повідомлення про введення даних»);

Writeln(«Повідомлення про введення результатів»);

Для введення даних можна використати оператори типу :

Read(A, B, C);

Readln(S1);

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

Для виведень результатів можна використати оператори типу :

Write(Rasult: 7: 2);

Де « 7» - кількість розрядів результату(включаючи знак числа, цілу частину, десяткову точку і дробову частину), « 2» - кількість розрядів після десяткової точки.

Writeln(Rasult: 7: 2);

Арифметичні вирази на мові Turbo Pascal :

A + B - складання дійсних або цілих чисел

A - B - віднімання дійсних або цілих чисел

A * B - множення дійсних або цілих чисел

A / B - ділення дійсних чисел

A div B - ділення цілих чисел(ціла частина частки).

Порядок виконання дій визначається рангом(старшинством) операцій або дужками за правилами алгебри.

Оператор привласнення виконується таким чином:

а) обчислюється значення вираження, записаного в правій частині оператора;

б) отримане значення привласнюється змінній, ім'я якої записане в лівій частині оператора;

: = <арифметическое_выражение> чи <константа>;

Наприклад, Result : = (A + B) / X;

B1: = true:

    1. Приклад підготовки і виконання програми

Після завантаження середовища Turbo Pascal натисніть F10 і виберіть створення нового вікна. Після цього можна приступити до набору тексту програми, натискаючи Enter у кінці кожного рядка. Наприклад:

{Програма обчислення суми двох чисел}

Program First _ Program;

Uses crt; {USES- розділ оголошення зовнішніх модуля}

{CRT- модуль роботи з екраном}

Var

A, B : Real; {дані, що вводяться}

S: Rreal; {сума чисел}

begin

clrscr; {виклик процедури очищенню екрану}

Writeln(«Програма обчислення суми двох чисел»);

Writeln(«------------------------------------------------------»);

Write(«Введіть два будь-які числа : »);

Readln(A, B);

S:=a+b;

Writeln('S=',S : 8: 2);

Writeln('Натисніть ENTER для продовження роботи');

Readln {очікування натиснення клавіші Enter}

end.

Для збереження програми виберіть команду Save з меню File(чи F2). Для компіляції програми натиснути F.

Turbo Pascal компілює програму, перекладаючи її з мови Pascal( який можна читати) на машинний код для мікропроцесора(який може виконати Ваш комп'ютер).

За наявності помилки див. п. 1.6.

Для виконання програми слід вибрати Run/Run в головному меню(чи натиснути Ctrl - F9).

Приклад роботи описаної вище програми :

  1. На екран виводяться повідомлення, які задані в операторах Writeln Вашої програми :

«Програма обчислення суми двох чисел«

«Введіть два будь-які числа:«

  1. Введення двох будь-яких чисел з пропуском між ними і натисніть Enter.

  2. На екран виводиться наступне повідомлення:

S=,

а за ним - вичислена сума двох введених чисел.

4. У наступному рядку виводиться повідомлення «Натисніть Enter», програма чекатиме натиснення клавіші Enter.

Що б подивитися результат рабати програми, виберіть Windows/ User Screen(чи натисніть Alt+F5). Якщо під час виконання програми сталася помилка, то на екрані з'явиться повідомлення, яке виглядає таким чином:

Run - time error <errnum> at <segment>:<offset>,

де <errnum> - це відповідний код помилки

<segment>:<offset> - це адреса пам'яті, де сталася помилка. Ви опиніться в точці розташування помилки у своїй програмі з описовим повідомленням про помилку. Поки повідомлення знаходиться в рядку статусу редактора, можна натиснути F1 для отримання довідкової інформації по конкретній помилці. Натиснення будь-якої іншої клавіші призводить до зникнення повідомлення про помилку.