Бесконечное выполнение

Date: 2015-10-07; view: 456.

Используя в программе предложение Goto, Вы можете заставить компьютер повторять выполнение какой-либо операции любое количество раз. Например, можно использовать программу Even or Odd и изменить ее так, как показано ниже; тогда программа будет выполняться бесконечно. Остановить выполнение программы можно нажатием на значок Закрыть (X) в верхнем правом углу окна.

begin:

TextWindow.Write("Введите число: ")

num = TextWindow.ReadNumber()

remainder = Math.Remainder(num, 2)

If (remainder = 0) Then

TextWindow.WriteLine("Число – четное.")

Else

TextWindow.WriteLine("Число – нечетное.")

EndIf

Goto begin

Рисунок 18 – Бесконечное выполнение операции

Глава 5

Циклы