Написать программу определяющую равны ли друг другу три введенные с клавиатуры числа
Написать программу определяющую равны ли друг другу три введенные с клавиатуры числа
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы