Составьте программу в Паскаль, вводящую true, если высказывание является истинным, и false в противном случае. а) Треугольник со сторонами a, b, с являются равносторонним. б) целое число N является чётным двузначным числом

а) Нам не известны значения этих переменных, но если мы введем возможность присвоить этим переменным какие-либо значения, то мы можем определить, является ли все высказывание верным.

Пусть пользователю необходимо в любом порядке ввести значения сторон а, b, c:

read (а, b, c);

Проверяем верность высказывания:

if (a = b) and (b = c) then

writeln ('true')

else

writeln ('false');

б) Проверим число на четность:

if (N mod 2 = 0) then

begin

str (N, str_N);

if (length (str_n) = 2) then

writeln ('true')

end;

else

writeln ('false');