Даны 3 числа a,b,c. Определить, имеется ли среди них хотя бы одна пара взаимно обратных чисел. ПОМОГИТЕ,ПОЖАЛУЙСТА!!!!!СРОЧНО НАДО!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Даны 3 числа a,b,c. Определить, имеется ли среди них хотя бы одна пара взаимно обратных чисел. ПОМОГИТЕ,ПОЖАЛУЙСТА!!!!!СРОЧНО НАДО!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Ответ(ы) на вопрос:
VAR
a,b,c: LongInt;
BEGIN
Read(a,b,c);
if (a*b = 1)or(a*c = 1)or(b*c = 1) then Write('ДА')
else Write('НЕТ');
END.
Не нашли ответ?
Похожие вопросы