Головна Головна -> Реферати українською -> Інформатика, комп'ютери, програмування -> Робота з файлами

Робота з файлами

Назва:
Робота з файлами
Тип:
Реферат
Мова:
Українська
Розмiр:
11,98 KB
Завантажень:
41
Оцінка:
 
поточна оцінка 5.0


Скачати цю роботу безкоштовно
Пролистати роботу: 1  2 
Тема: Робота з файлами.

Мета: Навчитися працювати із файлами і використовувати їх для розв‘язування подальших задач.

Інформація про масив садових ділянок задана таблицею

Інв. номер Прізвище

Бєдениж {

Тип ґрунту Площа ар ГОЗ за 1 aр Вартість

001

Беденюк дп 6 1798.5 10791

002 Головачук чз 7 2289 16023

003 Боровець чп 10 2616 26160

004 Вітрук дп 8 1798.5 14388

005 Клочко п 12 1308 15696

006 Загура чз 6 2289 13734

007 Паріпа чз 9 2289 20601

008 Ліщук дп 8 1798.5 14388

009 Шалимов { чп 11 2616 28776

010 Зінчик чз 6 2289 13234

011 Пасько п 10 981 9810

012 Дитина п 12 1308 15696

013 Хайлова чп 9 2616 23544

014 Позняковська Позняковська | дп 8 1798.5 14388

015 Чуб'як чп 10 2616 26160

Використовуючи записи, згідно моделі п. IV провести розрахунок ГОЗ для кожного садівника. Визначити вартість його ділянки (вид угідь = ‘сади‘), вивести повну таблицю на екран, а також виконати наступне завдання:

1) Відсортувати список в алфавітному порядку і вивести на екран потковий та відсортований список.

2) Відсортувати список по спаданню значення площі і вивести на екран початковий та відсортований списки.

3) Відсортувати список по спаданню вартості і вивести на екран початковий та відсортований списки.

4) Вивести на екран початковий список і окремо інформацію про записи, що містять прізвище з початковою літерою "Б".

5) Вивести на екран початковий список і окремо Інформацію про

ділянки, площа яких перевищує 9 арів,

6) Вивести на екран початковий список і окремо Інформацію про

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

7) Вивести на екран початковий список і окремо інформацію про

ділянки з типом ґрунту 1лДарново-підзолисті".

8) Вивести на екран початковий список і значення площі всього садового масиву.

9) Вивести на екран початковий список і значення ГС вартості всього садового масиву.

10) Ю. Вивести на екран початковий список і середнє значення площі однієї садової ділянки.

11) Вивести на екран початковий список і середнє значення ціни за 1

ар.

12) Вивести на екран початковий список і середнє значення ГОЗ садової ділянки.

13) Вивести на екран початковий список і окремо інформацію про

ділянки, ГОЗ яких нижче середньої.

14) Вивести на екран початковий список і окремо інформацію про

ділянки з типом ґрунту - «чорноземи звичайні» і вартістю нижче середньої.

15) Вивести на екран початковий список і окремо інформацію про

ділянки, площа яких більше від середньої, а ГОЗ нижча

середньої.

ВИКОРИСТАННЯ ФАЙЛІВ ДЛЯ ЗБЕРІГАННЯ І ОБРОБКИ ІНФОРМАЦІЇ,

Записати у типізований файл Z1 дані таблиці п. V. Прочитати дані з файлу в оперативну пам'ять, використати завдання п.V (згідно варіанту п.VII) і новоутворені дані записати у файл Z2.

Розглянемо наприклад використання файлів даних для зберігання та обробки інформації про масив дачних ділянок (умова прикладу 7). Початковий список запишемо у файл A: dacha, відсортований - у файл й А: dachasort.

Приклад 9.

Program DachFil;

Const N=15;

Type Dacha = Record

Num: Integer;

Pr: String [15];

G: String [2];

S, Oz, V: Real;

Zр. Bal: Integer;

End;

Var f, g: file of Dacha; {файлові змінні типу « запис Dacha»}

Dil :array [1..n] of Dacha; {масив записів –змінних типу Dacha}

Dil1: Dacha;

І. J: Integer;

begin

Assign (f, ' A:\dacha' );

Rewrite (f);

Writeln (' Запис розпочато' );

for i: = l to N do

with Dil [i] do begin



Write (‘ Номер’); readln (Num);

Write (‘Прізвеще’); readln (Pr);

Write (‘Тип ґрунту’); readln (G);

Write (‘Площа’); readln (S);

Write (‘ставка зем. податку); readln (Zp);

Wrlte (‘ Бал ґрунту ’); readln (Bal);

Oz: = 0. 3*Zp*Bal; V: Oz*S;

Write (f, Dil[i]); {Запис у файл}

Еnd; Writeln;

Writeln (‘Запис завершено ‘); readln;

{Вивід на екран }

Writeln (‘Масив землевласників ‘);

For i: =l to N do With Dil [i] do

Writeln (Num: 4, Pr:l5, G: 4, S:6:2, Оz:8:2, V:9:2’);

Readln;

{Сортування}

for i:=l to N do

for j:=i+1 to N do

if Dil[J]. Pr

Завантажити цю роботу безкоштовно
Пролистати роботу: 1  2 



Реферат на тему: Робота з файлами

BR.com.ua © 1999-2017 | Реклама на сайті | Умови використання | Зворотній зв'язок