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

Question

Информатика

Лия

19 апреля, 12:06

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

+5

Ответы (1)

Знаете ответ?

Арсеньюшка · Answer 1

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.