Question

Сделайте, пожалуйста! Написать программу Паскаль. 5 и 9 задача

Answer 1

program n5;var r, pi, L: real;beginpi:=3.14;writeln ('Введите радиус круга');readln (r);L:= 2*pi*r;write ('L=', L:4:2);end.

Answer 2

5)
var
L,r: real;
begin
read(r);
L:=2*Pi*r;
writeln('L=',L);
end.
9)
var
TC,TF:real;
begin
read(TF);
TC:=(TF-32)*5/9;
writeln('TC=',TC);
end.