Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ЛАБ.РОБОТИ-1 семестр.doc
Скачиваний:
1
Добавлен:
10.11.2019
Размер:
713.22 Кб
Скачать

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

  1. Чому не допускається перетин вкладених циклів?

  2. Як визначити кількість значень функції при зміні двох аргументів?

  3. Побудуйте графічний алгоритм для обчислення значень функції трьох змінних y=f(a,b,c); i=1,2,...,N; j=1,2,...,M; k=1,2,...,L.

4. Який оператор керує виходом з циклу?

5. Побудуйте програму, використавши структуру циклу з передумовою

6. Які дані необхідні для організації циклу?

7. Що таке цикл?

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

Тема роботи : Циклічні алгоритми і програми з накопиченням суми та добутку на алгоритмічній мові Pascal.

Мета роботи : Формування умінь створення циклічних алгоритмів і програм на алгоритмічній мові високого рівня Pascal.

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

Якщо необхідно обчислити суму значень деякої функції y=f(x) при різних значення аргументу, то доцільно буде організувати цикл, в якому не тільки обчислюються поточні значення функції, але й накопичується їхня сума шляхом додавання одержаної суми до попередньої суми. Тому формула, що використовується для накопичення суми, має вигляд . При першому виконанні циклу обчислюється значення , яке рівне . Тому початковому значенню суми перед циклом потрібно привласнити значення 0.

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

2. Хід роботи

2.1. Постановка задачі

Обчислити , де елементи масиву . Елементи масиву ввести довільні.

2.2. Графічний алгоритм показаний на рис.1 .

2.3. Таблиця ідентифікації змінних

Змінна

S

Xi

Ідентифікатор

s

X[i]

Рис.1. Графічний алгоритм

2.4. Програма мовою Pascal та результати обчислень

Program накопичення_суми;

Var

s:real;

i:integer;

x:array[1..20] of real;

Begin

writeln('Введіть значення елементів масиву Х: '); ;

for i:=1 to 20 do

begin

write('X[',i:2,']=');

readln(x[i]);

end;

s:=0;

for i:=1 to 20 do

s:=s+sqr(x[i]);

writeln('РЕЗУЛЬТАТИ РОЗРАХУНКУ:');

writeln('Сума =',s:6:2);

end.

РЕЗУЛЬТАТИ РОЗРАХУНКУ:

Сума = 8400.00

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

1. Яка структура алгоритму накопичення суми?

2. Яка структура алгоритму накопичення добутку?

3. Чому змінній, в якій накопичується добуток, перед його обчисленням присвоюють одиницю?

4. Яка структура алгоритму знаходження парних чисел; чисел кратних трьом, п’яти?

5. Побудуйте розгалуження за допомогою логічного умовного оператора.

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