Составьте программу ** языке паскаля для нахождения площади круга по диаметру .

Question

Составьте программу на языке паскаля для нахождения площади круга по диаметру .

Answer 1

Выше не правильно.
Вот программа:

program 123;
var s,d:real;
begin
readln(d);
s:=pi*(1/4)*d*d;
writeln(s);
end.

Answer 2

На языке Паскаля... Паскаль - это философ?:)

var a: real;
begin
     readln(a);
     writeln(3.14*a*a);
end.

Comments

Вы здесь ничего не посчитали и даже не задали площадь, как переменную. Бред полнейший.

---

Ошибка лишь в том, что я a на 2 забыл поделить, а задавать что-то как переменную - только место в ОЗУ занимать, нехорошо это

---

var d: real;
begin
readln(d);
writeln(3.14 * (d / 2) * (d / 2));
end.

А вот это правильно, pi*R^2

---

"""" writeln(3.14 * (d / 2) * (d / 2)); """""
Серьезно? Ха. Это вывод на экран. Вы ничего не сделаете, вам просто в паскале на черном экране напишет вот эту вот белеберду, не более. Вы не исполняете функцию, где оператор присваивания? Считали переменную д с клавиатуры, и тут же просто текстом вывели " 3.14 * (d / 2) * (d / 2 ""... И если Вы не в курсе, Паскаль знает, что такое число пи, поэтому можно не писать 3,14.

---

PascalABC не знает, я раньше через ArcCos писал пи, но тут можно и 3,14, это всё к ABC'шному:)

---

Согласен, PascalABC для учебных программ, но не думаю, что кому-то очень будет надо писать "серьёзную" прогу для нахождения площади)