Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лаб_1-6.doc
Скачиваний:
6
Добавлен:
23.02.2016
Размер:
382.98 Кб
Скачать

Результати роботи програми.

Вмiст файлу :

m[1].Field1= 99.41 m[1].Field2= 89.67

m[2].Field1= 40.16 m[2].Field2= 31.85

m[3].Field1= 52.56 m[3].Field2= 47.64

m[4].Field1= 32.26 m[4].Field2= 9.73

m[5].Field1= 58.97 m[5].Field2= 16.06

m[6].Field1= -86.93 m[6].Field2= -8.73

m[7].Field1= -24.97 m[7].Field2= 42.64

m[8].Field1= 99.87 m[8].Field2= -92.81

Результати обробки масиву :

m[6].Field1= -86.93 m[ 6].Field2= -8.73 Сума= -95.66

Лабораторна робота N4.

Завдання 8. Вивести суми полiв тих записiв,

обидва поля яких вiд'ємнi.

Виконав студент Чемерис С., група ЗКТ-301

Таблиця 4

Вар

N

Кількість елементів файлу і масиву

Структура записів

Завдання на обробку полів динамічних записів статичного масиву

12

real char

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

7

integer word

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

9

word char

Знайти запис, який у другому полі має максимальний код. Вивести його перше поле.

15

integer real

знайти кількість записів, перше поле яких кратне 5, і максимальний з знайдених елементів.

13

byte char

Вивести перше поле тих записів, друге поле яких відповідає введеному символу.

6

word word

Знайти запис з найбільшою і найменшою сумою елементів. Вивести номери записів і суми.

9

integer char

Вивести перше поле тих записів, друге поле яких є символом, що відповідає введеному коду.

8

real real

Вивести суми полів тих записів, обидва поля яких від’ємні.

13

integer ibteger

Підрахувати кількість записів, поля яких мають різні знаки.

10

byte word

Вивести поля тих записів, перше поле яких знаходиться в заданому діапазоні.

14

word byte

Знайти середнє арифметичне усіх перших полів записів масиву.

14

word char

Для кожного запису знайти і вивести суму значень першого поля і коду другого поля.

13

integer word

знайти і вивести поля запису, що має мінімальне перше поле і номер цього запису.

15

real real

Знайти і вивести суму від’ємних полів кожного запису.

13

byte byte

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

10

word integer

знайти кількість елементів, перше поле яких кратне трьом, і вміст запису з найбільшим результатом.

8

integer real

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

6

integer real

знайти і роздрукувати суму полів записів, перше поле яких парне.

8

integer char

Вивести друге поле тих записів, перше поле яких від’ємне.

9

real integer

Визначити кількість записів, сума елементів яких перевищує задане число А.

8

byte real

Визначити запис з мінімальним першим полем. Вивести суму його полів.

11

integer word

Визначити і кількість записів, що мають від’ємну суму полів і вивести їх.

14

real integer

Вивести номери записів, що мають додатну різницю полів.

15

byte word

визначити записи сума значень яких парна і вивести їх поля.

10

integer real

знайти кількість записів, що мають від’ємне друге поле. Вивести їх вміст.

13

word word

Знайти мінімальний елемент в кожному записі. Вивести його значення.

15

byte real

Знайти максимальний елемент в кожному записі. Вивести його значення.

9

real real

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

8

char real

Для кожного запису перше поле, якщо друге поле від’ємне.

14

byte real

знайти і вивести суму полів записів, що мають парні номери в масиві

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