Дан диаметр окружномти d. найти ее длину l=p*d. в качестве значения p использовать 3, 14

Question

Информатика

Марьям

20 декабря, 03:47

Дан диаметр окружномти d. найти ее длину l=p*d. в качестве значения p использовать 3, 14

+1

Ответы (1)

Знаете ответ?

Христена · Answer 1

var l, p, d: real;

label undf;

begin

undf: writeln ('Введите диаметр окружности:') ;

readln (d) ;

p : = 3.14;

l : = p * d;

writeln ('Длина равна ', l) ;

end.