21 ноября 2013 г. 10а класс

Оператор ветвления в полном варианте IF (условие) THEN (операторы) ELSE (операторы); условие - з- записывается с помощью знаков сравнения и принимает два значения: да или нет IF A>B THEN max:=A ELSE max:=B;

Оператор ветвления в неполном варианте IF (условие) THEN (операторы); IF A>B THEN B:=В*2;

Составной оператор if then begin {если условие выполнено (верно) } end else begin {если условие не выполнено (ложно) } end; Запомните!!! если в блоке один оператор, то можно не писать слова begin и end после then и else ; перед else не ставится точка с запятой; вторая часть ( else …) может отсутствовать (неполная форма);

Program find; Var a,a1,a2:integer; BEGIN writeln(Введите целое число); readln(a); a1:=a div 10; a2:=a mod 10; if a1>a2 then max:=a1 else max:=a2; END. Дано двузначное число. Определить какая из его цифр больше, первая или вторая.