Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Комп. методы 1 отв.docx
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
348.51 Кб
Скачать

2.4. Оператор cls - очистка экрана дисплея.

2.5. Оператор REM (REMARK) используется для записи комментариев (пояснений) в программах. Это т.н. “невыполняемый” оператор. Для записи комментариев также может использоваться символ  апостроф – ‘. Грамотно написанная программа должна быть понятна для пользователя. Кроме того, наличие комментариев облегчают внесение последующих изменений. В комментариях могут содержаться любые символы языка. Как и строковые константы, комментарии не подвергаются синтаксическому контролю.

2.6. Оператор LOCATE для позиционирования курсора в нужной точке экрана Обычно он записывается  перед операторами PRINT и INPUT и имеет следующий вид:

LOCATE   S,P                  (5)

где S – номер строки экрана,  а P – номер позиции в строке, в которые нужно установить курсор. Напомним, что на экране, как правило, 24 строки по 80 символов.

2.7. Оператор end – указатель конца программы.

2.8. Пример на составление программы линейной структуры.

Задание.

 Два рабочих изготовили за смену D1 и D2 деталей, при норме N деталей в смену. Определить процент выполнения нормы каждым рабочим.

Программа

CLS

T$=”определение процента выполнения нормы”

PRINT  TAB(20), T$

input  “введите величину нормы – “;N

input  “введите фамилию первого рабочего - ”;F1$

input  “введите фамилию второго рабочего - ”;F2$

PRINT  “Сколько деталей изготовил ”; F1$; : Input D1

PRINT  “Сколько деталей изготовил ”; F2$; : Input D2

P1=D1/N*100 : P2=D2/N*100   ‘Вычисление процента выполнения нормы

CLS                                              ‘Очистка экрана перед выводом результатов

LOCATE 8,20  :  PRINT  T$      ‘Вывод заголовка в 20 позиции 8 строки

LOCATE 10  ‘Позиционирование курсора в 10 строке (в 1 позиции по умолчанию)

PRINT  “рабочий “;F1$; “ изготовил ”; D1; “ деталей, выполнив норму на”;

PRINT USING  “ # # # .# #   %”;P1

PRINT  “рабочий “;F2$; “ изготовил ”; D2; “ деталей, выполнив норму на”;

PRINT USING  “ # # # .# #   %”;P2

END

Результаты решения контрольного примера

определение процента выполнения нормы

введите величину нормы – ? 30

введите фамилию первого рабочего - ? Иванов

введите фамилию второго рабочего - ? Петров

Сколько деталей изготовил Иванов? 50

Сколько деталей изготовил Петров? 70

(очистка экрана)

определение процента выполнения нормы

рабочий Иванов изготовил 50 деталей, выполнив норму на 166,67 %

рабочий Петров изготовил 70 деталей, выполнив норму на  233.33 %