По заданному радиусу и углу найти S сектора и дугу. программа Паскаль

Question

Информатика

Евгеныч

5 мая, 15:30

По заданному радиусу и углу найти S сектора и дугу. программа Паскаль

+5

Ответы (1)

Знаете ответ на вопрос?

Тихон · Answer 1

Угол задаётся в радианах

Vara, R:real;

Begin

Write ('a = ') ; Read (a) ;

Write ('R = ') ; ReadLn (R) ;

WriteLn ('S = ', Pi*R*R*a/360) ;

Write ('L = ', Pi*R*a/180) ;

End.