Програмирование на языке Basic. Федоряка Н.И. - 11 стр.

UptoLike

Составители: 

11
Если в комнате темно, тогда надо включить свет.
Если пойдет дождь, тогда надо взять зонтик,
иначе, зонтик не брать.
Пример: Проверить, равно ли введенное число некоторому значе-
нию, и в случае равенства выдать на экран сообщение о равенстве чисел.
REM сравнить число со каким-то значением
INPUT "Введите а", а
IF a=7 THEN PRINT "Числа равны"
END
После запуска программы проверяется равно ли введенное значение
семи или нет. Если равно, то на экран выводится сообщение 'Числа
равны'.
Пример: Определить большее из двух чисел, вывести его на экран,
затем - увеличить его в двое и вывести результат на экран.
REM определить большее из двух чисел...
INPUT "Введите а", а
INPUT "Введите b", b
IF a>b THEN
PRINT "Большее число: ", a
с=2*a
ELSE
PRINT "Большее число: ", b
с=2*b
END IF
PRINT "результат: ", c
END
Сначала программа запрашивает оба числа, затем проверяет условие
a>b. Если условие верно, то на экран выводится число a, затем это число
удваивается. Иначе на на экран выводится число b, затем число b удваива-
ется. В завершении на экран выводится удвоенное значение большего чис-
ла.
Обратите внимание: программа имеет один недостаток - не учитыва-
ется тот случай, когда введенные числа равны. Исправим это, использовав
вложение одного условия в другое.
REM определить большее из двух чисел...
INPUT "Введите а", а
INPUT "Введите b", b
IF a = b TNEN
PRINT "Числа равны"
с=2*a
ELSE
IF a>b THEN
PRINT "Большее число: ", a
PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com
                Если в комнате темно, тогда надо включить свет.
                Если пойдет дождь, тогда надо взять зонтик,
         иначе, зонтик не брать.
                Пример: Проверить, равно ли введенное число некоторому значе-
         нию, и в случае равенства выдать на экран сообщение о равенстве чисел.
                REM сравнить число со каким-то значением
         INPUT "Введите а", а
         IF a=7 THEN PRINT "Числа равны"
         END
                После запуска программы проверяется равно ли введенное значение
         семи или нет. Если равно, то на экран выводится сообщение 'Числа
         равны'.
                Пример: Определить большее из двух чисел, вывести его на экран,
         затем - увеличить его в двое и вывести результат на экран.
                REM определить большее из двух чисел...
         INPUT "Введите а", а
         INPUT "Введите b", b
         IF a>b THEN
         PRINT "Большее число: ", a
         с=2*a
         ELSE
         PRINT "Большее число: ", b
         с=2*b
         END IF
         PRINT "результат: ", c
         END
                Сначала программа запрашивает оба числа, затем проверяет условие
         a>b. Если условие верно, то на экран выводится число a, затем это число
         удваивается. Иначе на на экран выводится число b, затем число b удваива-
         ется. В завершении на экран выводится удвоенное значение большего чис-
         ла.
                Обратите внимание: программа имеет один недостаток - не учитыва-
         ется тот случай, когда введенные числа равны. Исправим это, использовав
         вложение одного условия в другое.
         REM определить большее из двух чисел...
         INPUT "Введите а", а
         INPUT "Введите b", b
         IF a = b TNEN
         PRINT "Числа равны"
         с=2*a
         ELSE
         IF a>b THEN
         PRINT "Большее число: ", a

                                                                               11


PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com