Безусловный переход

Бывают ситуации, когда в программе требуется пережать управление в другое место программы независимо от каких-либо условий. Это осуществляется с помощью оператора безусловного перехода GOTO.

ОБЩИЙ ВИД:

GOTO метка

где МЕТКА — это набор символов, начинающийся с буквы может содержать любое количество символов (букв и цифр) и заканчивающийся двоеточием.

Задача 1.

Выводить на экран квадраты чисел, вводимых с клавиатуры.

Примечание: Чтобы не произошло зацикливания, необходимо оговорить условие, при котором ввод чисел прекращается.

Решение.

CLS

PRINT “При вводе числа 0 программа закончит работу “

Met1:

INPUT “Введите число: “; A

IF A< >0 THEN PRINT A^2 ELSE END

GOTO Мet1

Если мы введем последовательно числа 7, -2, 0.4, 0, то получим следующий результат: