Введены 2 числа, a и b,выясните, имеет ли решение уравнение 1/(a+b). Пожалуйста,...

Question

Введены 2 числа, a и b,выясните, имеет ли решение уравнение 1/(a+b).
Пожалуйста, помогите!!! Напишите программу Паскаль

Answer 1

Пусть это и не уравнение, но смысл понятен:

Var a,b:real;
Begin
Write('a = ');Read(a);
Write('b = ');Read(b);
if a<>b then Write('Да')
else Write('На ноль делить нельзя!')
End.