Решение задачи Proc 19

#include <stdio.h>

float rings(float r1, float r2){
   return 3.14*(r1*r1-r2*r2);
}
 
int main(void)
{
    int i;
    for(i=1; i<=3; ++i){
        float r1,r2;
        printf("R1:");
        scanf("%f", &r1);
        printf("R2:");
        scanf("%f", &r2);
        printf("S:%f\n",rings(r1,r2));
    }
    return 0;
}

import random
import math

def RingS(R1,R2):
    return math.pi * (R1**2 - R2**2)

def CircleS(R):
    return math.pi * R**2

for i in range(0,3):
    print(i)
    L = sorted(random.sample(range(1, 10), 2), reverse=True)
    print(L)
    print("R_1 = {0}; R_2 = {1}".format(L[0], L[1]))
    print("Площадь круга 1: ", CircleS(L[0]))
    print("Площадь круга 2: ", CircleS(L[1]))
    print("Площадь кольца: ", RingS(L[0], L[1]))
									

program Proc19;
 
Function RingS(R1,R2:Real):Real;
begin
  RingS:=3.14*(sqr(R1)-sqr(R2))
end;
 
 
var
  R1,R2:Real;
  i:integer;
begin
 for i:=1 to 3 do 
  begin
   Write('R1 :');
   Readln(R1);
   Write('R2 :');
   Readln(R2);
   Writeln(RingS(R1,R2));
  end;
end.