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

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. Як побудувати програму накопичення суми і добутку, користуючись циклічними структурами з передумовою, з післяумовою?