Предмет: Информатика,
автор: Печенька669
ПОМОГИТЕ, ПОЖАЛУЙСТА!!!СРОЧНО
Даны три вещественных числа a, b, c. Определить, имеется ли среди них хотя бы пара равных между собой чисел.
Ответы
Автор ответа:
0
Я не понял, что надо делать с заданием... Но вот решение задачи на паскале =)
var a,b,c:real;
begin
writeln('Введите a,b,c: ');
read(a,b,c);
if a=b then writeln('a=b') else
if a=c then writeln('a=c') else
if b=c then writeln('b=c') else
writeln('Все числа разные');
end.
var a,b,c:real;
begin
writeln('Введите a,b,c: ');
read(a,b,c);
if a=b then writeln('a=b') else
if a=c then writeln('a=c') else
if b=c then writeln('b=c') else
writeln('Все числа разные');
end.
Похожие вопросы