Складена команда — це конструкція такого вигляду:
begin
<команда 1>;
……
<команда n>;
end;
Складена команда трактується як одна команда.
Запис begin end; чи ;; називається порожньою командою.
Надалі під командою будемо розуміти порожню, просту або складену команду.
Логічний вираз — це засіб записування умов для відшукання потрібних даних. Логічний вираз може приймати значення true (істинність) або false (хибність). Логічні вирази бувають прості та складені. Простий — це два арифметичні вирази, з'єднані символом відношення, а складений — це прості логічні вирази, з'єднані назвами логічних операцій: not, and і or. Прості логічні вирази, які входять у складені, завжди беруть у дужки.
Команда розгалуження if (умовна команда) має два різновиди.
1. Повна команда розгалуження має вигляд:
if <логічний вираз> then <команда 1> else <команда 2>;
Дія команди. Якщо логічний вираз істинний, то виконується команда 1, в протилежному випадку — команда 2. Команди 1 та 2 можуть бути простими або складеними.
Приклад. Нехай х=9. У результаті виконання команд if x>7 then y:=x*x else y:=sin(x); if x<5 then z:=exp(x) else z:=sqrt(x); отримаємо y=81,z=3.
2. Коротка команда розгалуження має вигляд:
if <логічний вираз> then <команда>
Дія команди. Якщо логічний вираз істинний, то виконується їоманда 1, інакше виконується команда, яка знаходиться за даною конструкцією.
Приклад. Нехай х=25. Тоді у результаті виконання команд if x>12 then у:=2*х; z:=10; if x<5 then z:=exp(x); гримаємо y=50,z=10.
2) Демонстраційний приклад.
Скласти програму знаходження найбільшого з трьох чисел a,b,c, введених з клавіатури.
Program n1;
var a,b,c,max:integer;
begin
readln(a,b,c);
if (a>=b)and(a>=c) then max:=a;
if (b>=a)and(b>=c) then max:=b;
if (c>=a)and(c>=b) then max:=c;
writeln(max);
end.
Program n1;
var a,b,c,max:integer;
begin
readln(a,b,c);
max:=a;
if b>max then max:=b;
if c>max then max:=c;
writeln(max);
end.
1) Розв’язування задач.
Розв’язати задачі:
а) Порівняти два числа.
б) Перевірити, чи трикутник зі сторонами a, b , c є прямокутним.
Комментариев нет:
Отправить комментарий