Решение задачи Begin 10

#include <iostream>
#include <cmath>
using namespace std;
int main(){
	double a,b;
	cin >> a >> b;
        cout << a + b << endl;
	cout << a - b << endl;
	cout << a * b << endl;
	cout << (a * a)  / (b * b) << endl;
        return 0;
}

import random

a = random.randrange(1,10)
b = random.randrange(1,10)
print("a = ", a)
print("b = ", b)
a2 = a**2
b2 = b**2
print("Квадрат a = ", a2)
print("Квадрат b = ", b2)
print("Сумма квадратов: ", a2+b2)
print("Разность квадратов: ", abs(a2-b2))
print("Произведение квадратов: ", a2*b2)
print("Частное квадратов: ", a2/b2)
									

program Begin10;
var
  a,b,Sum,Difference, Product, Quotient: Real;
begin
  Write('Введите число a: ');
  Readln(a);
  Write('Введите число b: ');
  Readln(b);
  Sum:=sqr(a)+sqr(b);
  Writeln('Сумма квадратов a и b равна: ',Sum);
  Difference:=sqr(a)-sqr(b);
  Writeln('Разность квадратов a и b равна: ',Difference);
  Product:=sqr(a)*sqr(b);
  Writeln('Произведение квадратов a и b равна: ',Product);
  Quotient:=sqr(a)/sqr(b);
  Writeln('Частное квадратов a и b равна: ',Quotient);
end.