Ввести с клавиатуры два числа. Определить, что больше, разность квадра- тов или модуль квадрата разности этих чисел. Ответ вывести в виде сообщения

#include #include #include using namespace std;int main (){ double a,b; cout << "enter a: "; cin >> a; cout << "enter b: "; cin >> b; if( (a-b)*(a+b) > fabs(a*a-2*a*b+b*b)) { cout << " bolshe raznost kvadratov"; return 0; } else { cout << " bolshe modul kvadrata raznosti"; return 0; } return 0;}

извиняюсь забыл,спасибо за ответ но нужно на pascal

к сожалению я мало, что помню в паскале, и я не совсем уверен в своём ответе

program zadanie;var a,b:double;begin writeln("enter a"); read(a); writeln("enter b"); read(b); if( (a-b)*(a+b) > fabs(a*a-2*a*b+b*b)) then writeln("Bolshe raznost kvadratov"); else writeln("bolshe modul kvadrata raznosti");end.

Вы не указали на каком языке программирования это написать, поэтому я выбрал на своё усмотрение - c++.#include <iostream>#include <windows.h>#include <math.h>using namespace std;int main (){    double a,b;cout << "enter a: ";cin >> a;cout << "enter b: ";cin >> b;if( (a-b)*(a+b) > fabs(a*a-2*a*b+b*b)){cout << " bolshe raznost kvadratov";return 0;}    else    {        cout << " bolshe modul kvadrata raznosti";        return 0;    }    return 0;}