20535

Обработка файла данных

Лабораторная работа

Информатика, кибернетика и программирование

Данные по машинам автобазы: номер марка план перевозок факт. Макет исходных данных номер марка план факт о 367 нр ГАЗ 105 100 л 577 ор ЗИЛ 185 185 н 705 ар КамАЗ 220 220 в 368 еу ЛИАЗ 343 340 а 859 ср МАЗ 368 368 у 364 ар УАЗ 373 373 м 290 ао КамАЗ 288 287 н 390 ал ГАЗ 100 99 Алгоритм программы Программа по разработанному алгоритму Командный файл Обработка файла данных CLEAR {Очистка экрана} SET TALK OFF {Команда запрета выполнения отдельных команд} USE Imfd...

Русский

2013-07-31

23.5 KB

0 чел.

Государственный Университет Управления

Институт финансового менеджмента

Лабораторная работа №2

«Обработка файла данных»

Выполнила:

Студентка в/о, группы б/у II-1

Кузнецова Анна


Задание.
Данные по машинам автобазы: номер, марка, план перевозок, факт. Вывести данные по машинам, по которым не выполнен план перевозок.

Макет исходных данных

номер

марка

план

факт

о 367 нр

ГАЗ

105

100

л 577 ор

ЗИЛ

185

185

н 705 ар

КамАЗ

220

220

в 368 еу

ЛИАЗ

343

340

а 859 ср

МАЗ

368

368

у 364 ар

УАЗ

373

373

м 290 ао

КамАЗ

288

287

н 390 ал

ГАЗ

100

99

Алгоритм программы

Программа по разработанному алгоритму

* Командный файл "Обработка файла данных"

CLEAR                          {Очистка экрана}

SET TALK OFF                   {Команда запрета выполнения

                               отдельных команд}

USE &Imfd                      {Команда открытия}

TEXT

Данные по машинам по которым не выполнен перевозок

    номер    марка  план  факт

ENDTEXT

I=1                           {определяет номер строки}

DO WHILE .NOT.EOF()

  IF PLAN>FACT

     @ I,3 SAY NOM

     @ I,15 SAY MAR

     @ I,22 SAY PLAN

     @ I,28 SAY FACT

     I=I+1

  ENDIF

  SKIP

ENDDO

WAIT                           {Команда ожидания}

RETURN                         {Команда завершения}

Вариант решения задачи

номер

Марка

план

факт

о 367 нр

ГАЗ

105

100

в 368 еу

ЛИАЗ

343

340

м 290 ао

КамАЗ

288

287

н 390 ал

ГАЗ

100

99


 

А также другие работы, которые могут Вас заинтересовать

59606. Свята і традиції західної Європи 160 KB
  Розповіді про свята: День святого Девіда Велика Британія. День святого Патрика англомовні країни. Свято 8 березня та День мам. День Паризької Комуни Франція.
59607. Свята та розваги соколят 73 KB
  Мета: допомогти учням зрозуміти суть людського життя визначити своє місце в ньому сприяти вихованню в них людяності чесності працьовитості відповідальності любові до людей до рідної землі; розвивати в учнів допитливість інтерес до навколишнього життя прагнення зясовувати доводити міркувати...
59613. Сучасні технології навчання 81.5 KB
  Мета: повторити узагальнити та поглибити знання учнів про іменник удосконалювати вміння розпізнавати іменник серед інших частин мови формувати вміння добирати аргументи на доведення своєї думки розвивати...