Turbo Basic прикладной

210 присваивание переменной k значение оценки по математике,

присваивание переменной f значение оценки по физике,

присваивание переменной c значение оценки по нач. геометрии;

215 расчет среднего балла и присваивание переменной p среднего

арифметического значение оценок i-го студента (присваивание переменной p массиву q, а массиву pol присваиваем номер студента (i));

216 обнуление переменной р;

227 закрытие цикла для расчета среднего балла;

230 обнуление р,

присваивание переменной k значения 1,

присваивание переменной j значения;

235-246 циклы для сортировки номера студентов и их среднего балла по возрастанию

(пузырьковая система);

247 открытие цикла для вывода данных о студентах на экран и в файл tablica.bas;

250-252 условие для вывода на экран данных о студентах по 15 человек;

255 если условие 250-252 не выполняется то происходит вывод студентов в столбик;

260 если условие 250-252 выполнилось, то требование нажать пробел для вывода следующей

группы;

270 пока не выполнится условие 260 программа будет ждать;

300-330 вывод данных о студентах в таблицу (на экран);

335 вывод данных о студентах в файл tablica.bas;

360 увеличение счетчика k на единицу;

375 закрытие цикла вывода информации на экран и в файл tablica.bas;

390-394 очистка экрана от старых данных с 12 по 21 строку;

395 закрытие файла tablica.bas;

397 условие для вывода на экран фамилий отличников по математике;

398 ожидание программой нажатия на пробел;

400 очистка экрана и печать текстового сообщения;

410-430 цикл с условием вывода на экран фамилий отличников по данной дисциплине;

432 условие для вывода на экран фамилий отличников по физике;

433 ожидание программой нажатия на пробел;

440 очистка экрана и печать текстового сообщения;

443-450 цикл с условием вывода на экран фамилий отличников по данной дисциплине;

451 условие для вывода на экран фамилий отличников по нач. геометрии;

452 ожидание программой нажатия на пробел;

455 очистка экрана и печать текстового сообщения;

460-470 цикл с условием вывода на экран фамилий отличников по данной дисциплине;

480 конец программы.

КОНТРОЛЬНЫЙ ПРИМЕР ПРОВЕРКИ РЕШЕНИЯ ЗАДАЧИ

Ахтямов Р.Р.

Математика 4

Физика 4

Начертательная геометрия 5

Средний бал (4+4+5)/3=4,33

Результат:

+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

+ Фамилия + Дисциплина + Средний +

+ Отчество ++++++++++++++++++++++++++++ бал +

+ Имя + мат + Физ + нач\гео + +

+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

+ Ахтямов Р.Р. + 4 + 4 + 5 + 4.33 +

+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

СПИСОК ИСПОЛЬЗУЕМОЙ ЛИТЕРАТУРЫ

1. Зельднер Григорий Алексеевич . «Microsoft BASIC», Москва,ABF,1995,432 стр.

2. Камиль Мусин Евгеньевич . «BASIC»,Москва, ABF,1994,399 стр.

Copying 2001ã all rights reserved â


Страница: