| Назад на содержание | Ветвления в алгоритмах в Basic |
|
|
Примеры:Задача 1. Определить, какое из двух чисел больше.INPUT "Введите два числа ";В,D IF D<B THEN PRINT "первое число больше" IF D>B THEN PRINT "второе число больше" IF D=B THEN PRINT "числа равны" Задача 2. Является ли целое число однозначным. INPUT "Введите целое число ";E% IF abs(E%)<=9 THEN PRINT "число однозначное" ELSE PRINT "число не однозначное" Задача 3. Делителем каких из трёх любых целых чисел является число 7. INPUT "Введите три целых числа ";A%,B%,C% IF A% MOD 7 =0 THEN PRINT "7 делитель ";A% ELSE PRINT "7 не делитель ";A% IF B% MOD 7 =0 THEN PRINT "7 делитель ";B% ELSE PRINT "7 не делитель ";B% IF C% MOD 7 =0 THEN PRINT "7 делитель ";C% ELSE PRINT "7 не делитель ";C% |