Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
LPR_SRS3 (1).doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
3 Мб
Скачать
☆
  1. Лабораторна робота №8

  1. Мп Turbo Pascal. Одновимірні масиви. Характерні прийоми алгоритмізації.

  1. Навчитися обчислювати суму, добуток, кількість елементів масиву, що відповідають заданій умові. Навчитися знаходити максимальний та мінімальний елементи масиву та їх індекси.

Задача №1

Скласти схему та програму. Задано масив з n чисел (n=7)

X {-20; 15; 3; -9; 7; -6; 14}. В заданому масиві знайти суму та кількість елементів, не більших заданого числа А (A=5).

Задача №2

Нехай yk - це число викликів, які поступають на АТС за k-ту секунду. Припустимо, що yk - випадкове число зі значенням від 0 до 6. Створити масив Y з десятьма елементами (k =1,10). Обчислити суму викликів за перші 10 секунд роботи АТС та максимальну кількість викликів, що були за деяку одну секунду. Вивести результати обчислень.

Випадкове ціле число зі значенням від 0 до 6 можна згенерувати за допомогою функції random(7). На початку виконуваного блоку слід записати виклик процедури randomize (вона забезпечить іншу послідовність чисел під час виконання програми вдруге).

program ATS;

uses wincrt;

type vyklyk= array[1..10] of integer;

var y: vyklyk; max,s,k: integer;

begin

max:=0; s:=0; {Припустимо,що кількість викликів=0}

randomize;

for k:=1 to 10 do

begin {Обчислимо кількість викликів за k-тy секунду}

y[k]:=random(7);

write('Кількість викликів за ',k,'-ту секунду:');

writeln(y[k]:5); {Виведемо цю кількість}

s:=s+y[k]; {Обчислимо суму викликів}

if y[k]>max

then max:=y[k]; {Обчислимо max значення }

end;

writeln('Кількість викликів за 10 секунд = ',s:3);

write('Максимальна кількість викликів за одну секунду = ',max)

end.

С

№8

класти блок-схему алгоритму розв’язання задачі відповідно до варіанту, зобразити її засобами Microsoft Word, написати програму мовою Pascal, відлагодити її та проаналізувати отримані результати [1].

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

Скласти схему та програму . Задано масив з n чисел (n=20)

X{-20; 15; 3; -9; 7; -6; 14; -13; 6; -7; 9; -12; 5; 7; -2; 17; 10; -1; 16; -3}.

В заданому масиві :

1

Знайти суму та кількість елементів, не більших заданого числа А (A=5).

2

Знайти суму та кількість елементів, не менших заданого числа А (A=5).

3

Знайти максимальне значення та його номер серед від’ємних елементів масиву.

4

Знайти максимальне значення та його номер серед додатних елементів масиву.

5

Знайти мінімальне значення та його номер серед від’ємних елементів масиву

6

Знайти мінімальне значення та його номер серед додатних елементів масиву

7

Обчислити суму та кількість від’ємних елементів.

8

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

9

Обчислити кількість та добуток від’ємних елементів.

10

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

11

Знайти кількість та добуток парних елементів.

12

Знайти кількість та суму парних елементів.

13

Знайти мінімальне по модулю значення та його номер.

14

Знайти максимальне по модулю значення та його номер.

15

Обчислити кількість та добуток елементів, що задовольняють умову –5 Xi  10

16

Обчислити кількість та суму елементів, що задовольняють умову –5 Xi  10

17

Обчислити кількість та суму елементів, що задовольняють умову Xi  –3 або Xi  10

18

Обчислити кількість та добуток елементів, що задовольняють умову Xi  –3 або Xi  10

19

Знайти добуток та кількість елементів, не більших заданого числа А (A=5).

20

Знайти добуток та кількість елементів, не менших заданого числа А (A=5).

21

Знайти добуток модулів від’ємних елементів та їх кількість.

22

Знайти кількість та суму елементів, що стоять на парних місцях.

23

Знайти суму та кількість елементів, що стоять на непарних місцях.

24

Знайти кількість та добуток елементів, що стоять на парних місцях.

25

Знайти кількість та добуток елементів, що стоять на непарних місцях.

26

Знайти кількість та добуток непарних елементів.

27

Знайти кількість та суму непарних елементів.

28

Знайти максимальне значення та його номер серед елементів, що задовольняють умову –10 Xi  8

29

Знайти мінімальне значення та його номер серед елементів, що задовольняють умову –10 Xi  8

30

Знайти суму модулів від’ємних елементів та їх кількість.

П итання для самоконтролю

  1. За яким принципом відбувається пошук максимального (мінімального) елемента в одновимірному масиві?

  2. За яким принципом відбувається обчислення суми значень елементів одновимірного масиву? З якою метою відбувається понулення значення суми перед початком її накопичення у циклі?

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

  4. Чим відрізняється обчислення добутку від обчислення суми?

Модульний контроль №1

Контрольна робота №1.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]