Операторы ветвления
Ветвление - такая форма организации действий, при которой в зависимости от выполнения некоторого условия совершается одна или другая последовательность действий
КОМАНДА ВЕТВЛЕНИЯ ИМЕЕТ ПОЛНУЮ (1)
Ветвление в полном варианте
Оператор ветвления в полном вариантеIF (условие) THEN (операторы) ELSE (операторы); записывается с помощью знаков сравнения и принимает два значения: да или нетIF A>B THEN max:=A ELSE max:=B; Сложные условия составляют из простых с помощью логических операций (OR, AND, NOT)IF (A>B)AND(A>C) THEN max:=A ELSE max:=100;
Ветвление в неполном варианте
Оператор ветвления в неполном варианте
обязательно должна быть описана в блоке описания. В тексте программы ставится в той строке, на которую передается управление. После метки ставится двоеточие.
Программа,Программа,рисующая 20случайныхокружностей вправой половинеэкрана
Program krugi;Program krugi; Uses Graph; Var x,y,r,z,i,grDriver,grMode:integer; Label 1;Begin grDriver:=detect; initGraph(grDriver,grMode,’d:/tp/bgi’); randomize; for i:=1 to 20 do begin z:=random(15); y:=random(480); r:=random(100); setcolor(z);1: x:=random(640); if x>340 then circle(x,y,r) else goto 1; end; readln; closeGraph;end.
Домашнее задание:Домашнее задание:п. 7.9 – читать,составить программу, рисующую 10 случайных окружностей в левой нижней четверти экрана