Составьте алгоритм, который проверяет, равны ли 3 данных числа.

Question

Составьте алгоритм, который проверяет, равны ли 3 данных числа.

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

Var a,b,c:integer;BeginWriteln('Введите числа a b c ');Readln (a,b,c);If (a=b) and (b=c) and (c=a) then Write ('Числа равны') else Write ('Числа не равны');End.