: = 'Y4astnik' + s;; i: = 1 to n-1 do
begin: = ms [i];: = 0; j: = i +1 to n do if ms [j]
;;; _viv;.
3. Опис структури програми
Програма має не складний набір процедур, які виконують необхідний розрахунок.
програма pascal дані обробка
У програмі задіяні наступні змінні і масиви:
ПеременнаяОпісаніеi, j, kПеременние-счетчікіn, mКолічество учасників і суддів соответственноVВибор пользователяprПроверочная переменнаяmaxПеременная для відшукання максимального местаpozПеременная-позіціяnomМесто участнікаput, sТекстовие змінні для створення імен файлів 3-х видів соревнованійMestМассів розподіл місць у судейMsМассів підсумкових местY4asСтроковий масив з іменами участніковbalМассів балів судейZanПроверочний массівtТекстовая мінлива
Після запуску програми буде виведений титульний лист. Після натискання клавіші Enter програма набуде цикл рішення задачі. p align="justify"> Для роботи програми потрібно ввести наступні дані: кількість учасників багатоборства і кількість суддів. Далі програма виведе список змагань. При виборі пунктів 1 - 3 буде проведений розрахунок. При виборі пункту 4 програма завершить роботу. p align="justify"> Дані змагань (бали кожного учасника) будуть створені за допомогою генератора випадкових чисел і занесені в текстові файли.
Після вибору виду змагань програма вважає дані результати з файлу і справить їх оцінку. Далі на екран буде виведено інформацію про місця. p align="justify"> Після натискання клавіші Enter програма завершитися.
4. Блок-схема програми
Процедура tityl
В
Процедура meny
В
Процедура rez
В
Процедура ras4_viv
В
В
В В
Основна програма
В
5. Аналіз даних і результатів
Титульний аркуш програми:
В
Введення кількості учасників і суддів:
В
Вибір користувача:
В
Результати обчислення:
В
Список використаних джерел
1. Ставровский А.Б. Турбо Паскаль 7.0. Підручник. - К.: Видавнича група BHV, 2000. - 400с.
2. Бондарєв В. М., Рублінецкій В. І., Качко Е. Г. Основи програмування, Фенікс, 1997р. - 350 c.
.