Помогите написать программу на языке Паскаль)

В прямоугольник со сторонами a и b вписан круг. Найти длину окружности.

Question

Информатика

Евдуша

15 ноября, 03:29

Помогите написать программу на языке Паскаль)

В прямоугольник со сторонами a и b вписан круг. Найти длину окружности.

+5

Ответы (1)

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

Маринка · Answer 1

Если ты имел ввиду описанную около пр-ка окружность то вот

program dlinap;

uses crt;

var a, b, diam, dlina : real;

const pi=3.14;

begin

write ('Чему равна длина и ширина пр-ка?') ;

Readln (a, b) ;

diam:=sqrt (sqr (a) + sqr (b)) ;

dlina:=pi*diam;

Writeln ('Длина окружности равна ', dlina) ;

end.

Помогите написать программу на языке Паскаль)В прямоугольник со сторонами a и b вписан круг. Найти длину окружности.

Помогите написать программу на языке Паскаль)

В прямоугольник со сторонами a и b вписан круг. Найти длину окружности.