Составить программу: вычислить и напечатать площади 2-х шаров при r1=15,8 , а r2 в 3 раза меньше r1.формула площади шара : sш= 3/4 п r^3

QBASIC

DIM r1, r2, Pi AS DOUBLE
r1 = 15.8
r2 = r1 / 3
Pi = 4 * ATN(1)
PRINT "S1="; 4 * Pi * r1 ^ 2; "S2="; 4 * Pi * r2 ^ 2; ""
END

Тестовое решение:

S1= 3137.068835908926 S2= 348.5632250288538

Чтобы продолжить, нажмите любую клавишу