Лабораторная работа: Програмування

Так, можна.

Нехай потрібно знайти найбільший спільий дільник двох натуральних чисел А і В

Program Nova;

Var a,b: integer;

Begin

Write(‘введіть два натуральних числа’);

Readln (a,b);

Repeat

If a>b then a:=a-b;

If b>a then b:=b-a;

Until a=b;

Writeln (‘НСД=’,a)

End.

7. Як використовуються оператори break, exit, continue.

Оператор break – вихід із циклу;

Операторcontinue – перериває виконання тіла самого внутрішнього циклу й передає управління в його заголовок

Операторexit – вихід з програми.

Індивідуальне завдання

Обчислити значення суми з точністю до е.

Лабораторна робота №1 2

Тема роботи: Одномірні масиви.

Мета роботи: одержати навички побудови алгоритмів та програмування задач із векторами на мові Pascal.

Порядок виконання роботи.

1. Вивчити теоретичний матеріал.

2. Відповісти на запитання.

3. Виконати індивідуальні завдання.

4. Скласти звіт, в якому викласти коротко теоретичний матеріал. блок-схему алгоритму та програму.

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

1. Який опис масиву є невірним: