Хід роботи

1. Написати програму, яка виведе на екран строфу вірша:

"На далёкой Амазонке

Не бывал я никогда.

Только "Дон" и "Магдалина" -

Быстроходные суда -

Только "Дон" и "Магдалина" -

Ходят по морю туда."

2. Написати програму, яка запитує у користувача два дійсні числа і виводить їх суму, різницю і добуток.

3. Написати програму, що задає користувачеві прості запитання (5 запитань), і, в залежності від відповіді дає свої коментарії.

Наприклад:

Привіт! Як тебе звуть?

Відповідь: - Оксана.

Скільки тобі років, Оксано?

Відповідь: 16.

Отже твій рік народження - 1990.

і т. д.

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

1. Який зміст першого рядка програми на Паскалі?

2. Опишіть структуру програми на Паскалі.

3. Які розділи описів можуть бути у програмі?

4. Як буде виглядати сама коротка програма, написана мовою Паскаль?

5. Як описуються константи?

6. Як описуються змінні?

7. Які бувають типи змінних?

8. Які оператори є простими операторами?

9. Що таке складений оператор?

10. Як працює оператор присвоювання?

11. Яка різниця між операторами write i read?

12. Яка різниця між операторами write i writeln?

13. Яка різниця між операторами readln(a) i readln?

14. Як ввести коментар до програми?

15. Як запустити програму?

16. Що таке - компіляція?

17. Як запустити компілятор без запуску програми?

18. Чи можна дві програми виконувати в одному файлі?

Лабораторна робота №3 (5) Тема: Робота з арифметичними операціями в Turbo Pascal

Meта: Уміти використовувати арифметичні функції при написанні програм

Теоретичні відомості

Арифметичні операції та функції в ТП мають свої конструкції, вони подані в таблиці №1 в додатку.

Аргумент тригонометричних функцій задається в радіанній мірі.

Інші тригонометричні функції задаються через відношення cos, sin i arctg. (Див. табл.. №2)

Логічні операції

Лог. заперечення___________Not

Логічне "і"_________________And

Логічне "або"______________Or

Лог. "виключаюче або"______Xor

Хід роботи

1. Скласти програму, яка вирахує значення рівняння:

2. Скласти програму, яка вирахує значення рівняння:

3.Скласти програму, яка вирахує значення тригонометричного рівняння:

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

1. Як знайти значення tg x?

2. Чи має значення велика чи мала літера в написанні програм?

3. Як дізнатись про існуючі арифметичні функції за допомогою середовища програмування?

4. Як знайти цілу частину від ділення?

5. Як відобразити число з фіксованою крапкою на екрані?

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

7. Навіщо вводяться різні відступи початку рядка в тексті програм?

8. Що таке службові слова? Наведіть приклади.

9. Назвіть цілочислові типи даних та їх границі діапазонів.

10. Які типи даних належать до дійсних?

11. Які типи даних належать до структорованих?

Лабораторна робота № 4 (6) Тема: Робота з умовним оператором

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

Теоретичні відомості

Якщо необхідно вибрати одну з можливих дій залежно від певної умови, застосовують умовний оператор. Наприклад, при знаходженні коренів квадратного рівняння необхідно перевірити,щоб корінь із дискримінанта існував. У наведеній нижче програмі вирішується дане питання.

program Square;

var

a,b,c,d,x1,x2:real;

begin

Writeln ('Введите число a,b,c');

Read ( a,b,c);

d:=sqr ( b )-4*a*c;

if D<0

then Writeln ('Корней нет')

else

begin

x1:= - (b + sqrt (d))/ ( 2*a);

x2:= - (b - sqrt (d))/ ( 2*a);

Writeln (' x1=',x1:2:2);

Writeln (' x2=',x2:2:2);

end;

readln;

end.

У деяких задачах зручно застосовувати вкладені умовні оператори типу

if...then...if...then...else...else або if...then...else...if...then...else...

Наприклад, необхідно вибрати найбільше з трьох чисел. Для цього використовують

схему:

if (a>b) and (a>c) then writeln ('a-max')

else

if (b>c) then writeln ('b - max')

else writeln ('c - max');

Складена умова об'єднується and або or.