Написать программу для вычисления длины и площади окружности если r= 5,9 ввод с клавиатуры

Question

Написать программу для вычисления длины и площади окружности если r= 5,9 ввод с клавиатуры

Comments

язык?

---

язык?

---

или псевдокод?

---

паскаль

---

тогда не ко мне, знаю только c++/java

---

паскаль

Answer 1

Const pi=3,14;
var r,s:integer;
begin
write('Введите радиус:');
read(r);
s:=2*pi*r;
writeln('Площадь круга-',s);
end.

Comments

а длина окружности?

---

и pi можно было бы и точнее задать

---

сорри не правильно маленько записал вот:
var r,s,l:real;
var pi:=3.14159;
begin
write('Введите радиус:');
read(r);
l:=2*pi*r;
s:=pi*sqr(r);
writeln('Длина круга-',l);
write('Площадь круга-',s);
end.

---

вот, другое дело :)