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

Question

Информатика

Федуся

4 марта, 21:20

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

+4

Ответы (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.