Question

УМОЛЯЮ ВАС,УМОЛЯЮ.
напишите пожалуйста блок схему к задаче и программу,умоляю.
Задача:
С клавиатуры вводится два числа являющихся сторонами треугольника.Доказать что треугольник является равнобедренным с помощью логической переменной

Answer 1

var
Is_right: Boolean;
a, b:Integer;

Begin
Read(a, b);
Is_right := (a = b);
Write(Is_right);
end.


Вводишь 2 переменные, если они равны - значит треугольник равнобедренный и выводится TRUE. Если же числа не равны, то треугольник не равнобедренные, и , соответственно, выводится FALSE. Смысл в том, что логической переменной присваивается результат логического выражения a = b.