Написать программу определяющую равны ли друг другу три введенные с клавиатуры числа

Question

Информатика

Никула

3 июля, 01:05

Написать программу определяющую равны ли друг другу три введенные с клавиатуры числа

+2

Ответы (1)

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

Прокофий · Answer 1

var a, b, c:integer;

begin

writeln ('Vvedite 3 chisla') ;

readln (a, b, c) ;

if (a=b) and (b=c) then write ('Ravni') else write ('Ne ravni') ;

end.