Вопрос 55

Прежде чем, приступить к написанию программы, чтобы сделать алгоритм более наглядным и лучше отследить моменты дискретизации и детерминированности, часто используют блок-схемы. Это графическое изображение, где в виде различных геометрических фигур описывают элементы будущей программы. Причем за определенными фигурами закреплены конкретные элементы, например, серию команд (линейный алгоритм) принято обозначать в виде прямоугольника, внутри которого описывается сама последовательность действий. Фигурой эллипса (прямоугольника с закругленными углами) обозначают начало и конец программы. Стрелками указывают направление действия программы. Существуют специальные ГОСТы, где перечислены все возможные фигуры, используемые для этих целей.

Пример 2. Треугольник задан величинами своих сторон. Найти его площадь.

program Example1_S;

var    a,b,c,р,s : real;

begin

write( 'А=' ) ;

readln (a);

write ( 'В=');

readln(b);

write('C=');

readln (c);

p:=(a+b+c)/2;

s:=sqrt(p*(p-a)*(p-b)*(p-c)

writeln('S=',s:6:2);

end.

Вопрос 56 (+Вопрос 58)

Операторы if и case языка Паскаль 

Для программирования разветвляющихся алгоритмов в языке Pascal  используются специальные переменные типа boolean, которые могут  принимать только два значения - true и false (да, нет), а также операторы if и  case. Оператор if проверяет результат логического выражения, или значение  переменной типа boolean, и организует разветвление вычислений.  Например, если x, y, u : extended, то фрагмент программы с оператором if  может быть таким: 

  if x>y then u:=y-x    else u:=x-y; 

Оператор выбора case организует разветвления в зависимости от  значения некоторой переменной перечисляемого типа.  Например, если vib : integer, то после выполнения 

  case vib of    0:u:=x+y;    1,5:u:=x-y;    2,4,6:u:=x*y;    else u:=0;    end; 

В соответствии со значением vib вычисляется u. Если vib=0, то u=x+y,  если vib=1 или 5, то u=x-y, если vib=2 или 4 или 6, то u=x*y и, наконец, u=0 при  любых значениях vib отличных от 0, 1, 2, 4, 5, 6. 

Вопрос 57

Операции отношения.

	[Операнд1] < [Операнд2]	Меньше
	[Операнд1] > [Операнд2]	Больше
	[Операнд1] <= [Операнд2]	Меньше или равно
	[Операнд1] >= [Операнд2]	Больше или равно
	[Операнд1] <> [Операнд2]	Не равно
	[Операнд1] = [Операнд2]	Равно
	[Операнд1] Is [Операнд2]	Сравнение двух операндов, содержащих ссылки на объекты
	[Операнд1] Like [Операнд2]	Сравнение двух строковых выражений

Логические операции.

	[Операнд1] And [Операнд2]	Логическое умножение
	[Операнд1] Or [Операнд2]	Логическое сложение
	[Операнд1] Хог [Операнд2]	Исключающее or (или)
	[Операнд1] Not [Операнд2]	Логическое отрицание
	[Операнд1] Imp [Операнд2]	Логическая импликация (в настоящее время почти не используется)
	[Операнд1] Equ [Операнд2]	Логическая эквивалентность (в настоящее время почти не используется)