
- •Практична робота № 9 Тема:Реалізація циклічних алгоритмів
- •Загальні відомості
- •2.1. Оператор циклу з передумовою (while)
- •2.2. Оператор циклу з постумовою (repeat...Until)
- •2.3. Оператор циклу з параметром (for-do)
- •Практична частина
- •Додаток Приклад програми з використанням операторів повторення
- •Реалізація задачі за допомогою оператора повторення з передумовою
- •Реалізація задачі за допомогою оператора повторення з постумовою
- •Реалізація задачі з використанням оператора повторювання з параметром
- •Варіанти завдань
Практична частина
Скласти схему алгоритму відповідно індивідуальному завданню;
Скласти програму відповідно схеми алгоритму;
За допомогою інтегрованого середовища Турбо Паскаля ввести програму, надавши їй ім’я PR13;
Запустити програму на виконання;
При необхідності налагодити програму за допомогою сеансу налагодження;
Проаналізував програму, введіть необхідні корективи в текст програми і перевірте її роботу.
Вірну програму збережіть під ім’ям PR13 в папці, яка відповідає номеру вашої групи..
Додаток Приклад програми з використанням операторів повторення
Завдання
Створити програму на мові Паскаль для реалізації рівняння:
Реалізація задачі за допомогою оператора повторення з передумовою
PROGRAM V1;
USES CRT;
VAR
I: BYTE;
X, Y: REAL;
BEGIN
Y:=0;
I:=1;
READLN(X);
WHILE I<=8 DO
BEGIN
Y:=Y+(X+I);
I:=I+1;
END;
WRITELN(Y);
END.
Реалізація задачі за допомогою оператора повторення з постумовою
PROGRAM V2;
USES CRT;
VAR
I: BYTE;
X, Y: REAL;
BEGIN
Y:=0;
I:=1;
READLN(X);
REPEAT
Y:=Y+(X+I);
I:=I+1;
UNTIL I<=8
WRITELN(Y);
END.
Реалізація задачі з використанням оператора повторювання з параметром
PROGRAM V3;
USES CRT;
VAR
I: BYTE;
X, Y: REAL;
BEGIN
Y:=0;
READLN(X);
FOR I=1 TO 8 DO
Y:=Y+(X+I);
WRITELN(Y);
END.
Варіанти завдань
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
17.
|
18.
|
19.
|
20.
|
21.
|
22.
|
23.
|
24. |
25.
|
26.
|
27. |
28. |
|
|
|
|