1)составить программу, которая подсчитает объем любого шара по формуле: V=4/3Пr^3
2)даны действительные числа x и y. необходимо определить принадлежит ли точка с координатами (x,y) окружности с радиусом R и центром в точке (x1,y1).
3)дан одномерный числовой массиф В(16). Необходимо вывести на экран индексы элементов значения, которых равны числу P.
cрочно надо на языке паскаль составить плиз)
Program Shar;
Var
r, v: Real;
Begin
Write(r = );
ReadLn(r);
v := 4 / 3 * 3.14 * r * r * r;
WriteLn(v = , v);
ReadLn;
End.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
