Ответ:
Пишу на языке Pascal
Программа:
var
l5cm, s5cm,l6cm, s6cm :real;
begin
l5cm := 2*5*3,14;
l6cm := 2*6*3,14;
s5cm := 3,14*5*3,14;
s6cm := 3,14*6*3,14;
writeln('Длина окружности при R = 5 см равен ',l5cm,' см.' );
writeln('Площадь окружности при R = 5 см равен ',s5cm,' см.' );
writeln('Длина окружности при R = 6 см равен ',l6cm,' см.' );
writeln('Площадь окружности при R = 6 см равен ',s6cm,' см.' );
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Пишу на языке Pascal
Программа:
var
l5cm, s5cm,l6cm, s6cm :real;
begin
l5cm := 2*5*3,14;
l6cm := 2*6*3,14;
s5cm := 3,14*5*3,14;
s6cm := 3,14*6*3,14;
writeln('Длина окружности при R = 5 см равен ',l5cm,' см.' );
writeln('Площадь окружности при R = 5 см равен ',s5cm,' см.' );
writeln('Длина окружности при R = 6 см равен ',l6cm,' см.' );
writeln('Площадь окружности при R = 6 см равен ',s6cm,' см.' );
end.