Главная » Basic » ПРИМЕРЫ ПРОГРАММ

0

Первая из  приведенных ниже  программ  преобразует  галлоны  в   литры.  Количество галлонов запоминается в  переменной А и преобразуется с помощью соотношения 1 галлон = 4,54 л (ответы, набираемые на клавиатуре пользователем, подчеркнуты).

10 REM ПРЕОБРАЗОВАНИЕ ИЗ ГАЛЛОНОВ В ЛИТРЫ

20 LET A=7

30 LET B=A*4.54

40 PRINT B

50 END

RUN (команда исполнения программы)

31.78 (результат)

END AT LINE 50 (сообщение системы о завершении исполнения программы) 23

Выданный ответ говорит, что 31.78 л эквивалентны 7 галлонам. Обратите внимание на выдаваемое системой заключительное сообщение END AT LINE 50; оно может быть иным в  другой системе  с Бейсиком. Некоторые системы в  конце исполнения программы выдают  ОК, но в  книге будет  использоваться первая форма.

Чтобы сделать работу с программой более удобной, добавим в  нее несколько операторов PRINT  и заменим строку 20 на оператор INPUT. При этом в  ЭВМ потребуется ввести только новые строки. Полный текст новой программы станет следующим:

10 REM ПРЕОБРАЗОВАНИЕ ИЗ ГАЛЛОНОВ В ЛИТРЫ

18 PRINT "ВВЕДИТЕ ЧИСЛО ГАЛЛОНОВ"

20 INPUT A

30 LET В=А*4.54

35 PRINT "ГАЛЛОНЫ"."ЛИТРЫ"

40 PRINT А,В

50 END RUN

ВВЕДИТЕ ЧИСЛО ГАЛЛОНОВ

? 7 (программа запрашивает ввод и получает его)

ГАЛЛОНЫ ЛИТРЫ

7  31.78 END AT LINE 50

8   заключение приведем достаточно сложную программу, в  которой операторы PRINT  изображают текст и ответы  в одной строке и которая использует в строке 50 новый тип переменной.

Эта программа вычисляет заработную плату (G), получая за счет ввода количество  отработанных за неделю часов (Н), почасовую ставку (R) и фамилию работника. (Ответы пользователя подчеркнуты.) 10 REM ПРОГРАММА НАЧИСЛЕНИЯ ЗАРПЛАТЫ

20 PRINT "ВВЕДИТЕ ОТРАБОТАННОЕ ВРЕМЯ И ПОЧАСОВУЮ СТАВКУ"

30 INPUT H.R

40 PRINT "ВВЕДИТЕ ФАМИЛИЮ"

50 INPUT N$

60 LET G=H*R

70 PRINT N$;" ПОЛУЧИТ";G;"РУБ."

80 END RUN

ВВЕДИТЕ ОТРАБОТАННОЕ ВРЕМЯ И ПОЧАСОВУЮ СТАВКУ ВВЕДИТЕ ФАМИЛИЮ

?Тихонов

ТИХОНОВ ПОЛУЧИТ 50 РУБ END AT LINE 80

Обратите внимание на применение строковой переменной N$ для хранения фамилии  работника. Подобные переменные содержат текст в виде  строк символов. Точки с запятой в операторах PRINT, как показано выше, дают иной эффект, чем запятые. В деталях это будет обсуждаться позже, а пока что попробуйте сами найти разницу.

УПРАЖНЕНИЯ

(Служебное слово LET в операторах присваивания опускается.)

1.1.     Какие конечные значения примут переменные после использования следующих  фрагментов программ?

(а) 10 А*2 20 В=А 30 Z=A+2*B 40 А=В

(б) 10 А=-5 20 В=-А З0 Q=1/(A+2)-B

(в) 10 B=0

20 А=(В+1)/(2+В) 30 Z=-2/(A*(B-A (г) 10 А=0

20 А=А+10

30 А=А*А 40 А=А+10

1.2.  Напишите операторы присваивания (LET), вычисляющие по следующим формулам:

(а) а=b+с2

(б)а =(a+b)/c,

(в)y=(х+а)/(y-b),

1.3.  Что делает следующая программа?

10 А=22

20 В=-4.1

30 D=7.6

40 С=109.34

50 Z=A+B+C+D

60 Z=Z/4

70 PRINT Z

80 END

1.4.   Перепишите программу из упражнения 1.3, заменив операторы 10 40 на один или  несколько операторов INPUT.

1.5.   Требуется написать финансовую программу, начисляющую простой процент с ДАННОЙ суммы в течение данного времени. Пусть переменная М содержит сумму денег,

время  в годах, a R процентная ставка  (в пределах 0… 100). Соответствующая формула такова:

процент = М*Т*(R/100)

(.Указание: возьмите для программы стандартную форму ввод-обработка-вывод.) 25

Источник: Уолш Б.    Программирование на Бейсике: Пер. с англ. М.: Радио и связь, 1988. 336 с: ил.

По теме:

  • Комментарии