Question

Срочно решите 10 класс!!!! Информатика

Answer 1

program sanya2263;

var a,b,c,d,k,x: real;

begin

read(a,b,c,d,k);

x:=a+b/(c-d)-abs(k);

write(x);

end.

program irpprmrr;

var r,s: real;

begin

read(r);

s:=pi*sqr(r);

write(s);

end.