Программирование. Оператор перехода GOTO.
презентация к уроку по информатике и икт (9 класс) на тему

Слайд 1

Оператор перехода Goto Цикл Метки Автор: Зубкова Екатерина Александров н а ГБОУ СОШ №1378 г. Москва Язык программирования Pascal 9 класс

Слайд 2

Понятие цикла Цикл – главное средство заставить компьютер много раз сделать одно и тоже или похожее. Рис.1. Образец циклических композиций С помощью цикла можно создать повторяющиеся узоры (рис.1), эффект движения, выполнить расчеты по таблицам и многое другое.

Слайд 3

Рассмотрим фрагмент программы: Write (‘ Это ’); Write (‘ тело ’); Write (‘ цикла ’); Write (‘ ’); В случае, если эта часть программы выполнялась бы бесконечно, то на экране мы бы увидели: Это тело цикла Это тело цикла Это тело цикла … Задача : как изменить порядок выполнения операторов, чтобы после оператора Write (‘ ’) выполнялся оператор Write (‘ Это ’) и программа выводила бы нужную нам строчку?

Слайд 4

Оператор перехода GOTO – оператор перехода (читается – « гоуту », переводится как «иди к»); Метка – это произвольное имя или произвольное не слишком большое целое положительное число. Пример программы: LABEL m1; BEGIN m1: Write (‘ Это ’); Write (‘ тело ’); Write (‘ цикла ’); Write (‘ ’); Goto m1 END.

Слайд 5

Правила работы с оператором goto Оператор GOTO можно писать в любых местах программы, и метку можно ставить перед любым оператором, заставляя компьютер таким образом перескакивать в программе откуда угодно куда угодно; Метка должна отделятся от оператора двоеточием; Метки, встречающиеся в программе, должны быть описаны выше BEGIN после слова LABEL ( читается – «лэйбл», переводится как «метка» ) .

Слайд 6

Пример использования оператора goto LABEL 8; VAR a, k: integer; BEGIN k:=6; a:=100; Goto 8; a:=a+k; k:=2*k; WriteLn (a); 8: a:=a+1; k:=k+10; WriteLn (k,’ ‘,a); END. Результат работы программы: 16 101

Слайд 7

Самостоятельная работа на компьютере Написать программы для выполнения следующих заданий: Бесконечно печатать букву А: ААААААААА…… Бесконечно печатать 1000 999 998 997 996…… Бесконечно печатать 100 50 25 12.5…… с восьмью десятичными знаками.

Слайд 8

Выход из цикла с помощью if Вариант 1 LABEL m; VAR f: integer; BEGIN Write (‘ Начало счета ’); f:=3; m: Write (f,’ ’); f:=f+2; if f<=9 then goto m; Write (‘ Конец счета ‘); END. Вариант 2 LABEL m 1 , m2; VAR f: integer; BEGIN Write (‘ Начало счета ’); f:=3; m1: Write (f,’ ’); f:=f+2; if f>9 then goto m2 else goto m1; m2: Write (‘ Конец счета ‘); END.

Слайд 9

Выход из цикла с помощью if Вариант 3 LABEL m 1 , m2, m3; VAR f: integer; BEGIN Write (‘ Начало счета ’); f:=3; m1: if f<=9 then goto m3 else goto m2; m3: Write (f,’ ’); f:=f+2; goto m1; m2: Write (‘ Конец счета ‘); END.

Слайд 10

Реши самостоятельно Написать программы решения следующих задач: Напечатать 1 2 3 4 … 99 100; Напечатать 100 99 … 3 2 1; Напечатать 1 2 3 4 … 99 100 99 … 3 2 1.