Что нужно сделать чтобы напечатать готовый проект в

(неясно-пиши в личку)

var

x,y: real;

begin

readln(x);

y: =7*sin(x)*sin(x)-0.5*cos(x);

writeln(y);

end.

1)

германия берлин

греция афины

испания мадрид

польша варшава

франция париж

2)

греция афины

германия берлин

польша варшава

испания мадрид

франция париж

var s,r: real;

begin

  read(r);

  s: =pi*sqr(r);

  writeln(s: 0: 4);

end.