Составить программу: вычислить и напечатать площади 2-х шаров при R1=15,8 , а R2 в 3 раза...

Question

Составить программу: вычислить и напечатать площади 2-х шаров при R1=15,8 , а R2 в 3 раза меньше R1.Формула площади шара : Sш= 3/4 П R^3

Answer 1

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

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