ПЛИЗ! ПОМОГИТЕ! Написать программу: определение площади закрашенной поверхности.

Question

ПЛИЗ! ПОМОГИТЕ! Написать программу: определение площади закрашенной поверхности.

---

Comments

A задаётся пользователем.

---

Нет

---

В таком случае откуда нам его взять?

Answer 1

Var
 a,s:real;
begin
 readln(a);
  s:=sqr(a)/2;
 writeln(s);
end.

Answer 2

Var a,s:real;
begin
writeln('vvedi a:');
readln(a);
s:=a*a/2;
writeln('S=',s);
end.

Comments

Неверно. В этом случае на 2 поделится не квадрат a, а лишь один a.

---

Упс, видимо, нужно проветриться.

---

ага :) Это не 2+2*2