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

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

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

⌐A & ⌐(⌐A ∨ ⌐B) = ⌐A & (⌐⌐A & ⌐⌐B) = ⌐A & (A & B) = (⌐A & A) & B = 0 & B = 0

⌐(⌐A ∨ ⌐B) = ⌐⌐A & ⌐⌐B   (правило де Моргана для ИЛИ)

⌐⌐A = A   (закон двойного отрицания)

⌐⌐B = B   (закон двойного отрицания)

⌐A & (A & B) =  (⌐A & A) & B   (сочетательный закон для И)

(⌐A & A) = 0   (операция переменной с её инверсией для И)

0 & B = 0   (операция с константой для И)

отрицание (НЕ, ⌐, черта над буквой)

конъюнкция (И, &, ∧)

дизъюнкция (ИЛИ, ∨)

Объяснение:

ответ:

P AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SPAM

SAM

AM

AMP

AMSP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AMSP

ASP

SP

SPM

SPAM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SP AM

SPAM

SAM

AM

AMP

AMSP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AM SP

AMSP

ASP

SP

SPM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

SPAM

Must Waste More Time...