Заданы три числа — а, Ь, с. Известно, что два из них равны между собой, а третье отлично от них. Найдите, какое из чисел отлично от двух других.
Ответы на вопрос
Ответил Аноним
0
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
var a,b,c:integer;
Write('Введите a,b,c через пробел: '); Read(a,b,c);
// предполагаем, что два из трех равны, а одно отличается
if a=b then Writeln('третье отличается')
else
if a=c then Writeln('второе отличается')
else Writeln('первое отличается')
end.
begin
var a,b,c:integer;
Write('Введите a,b,c через пробел: '); Read(a,b,c);
// предполагаем, что два из трех равны, а одно отличается
if a=b then Writeln('третье отличается')
else
if a=c then Writeln('второе отличается')
else Writeln('первое отличается')
end.
Новые вопросы