// PascalABC.NET 3.3
1.
begin
var (x,y,z):=ReadReal3;
writeln((x+y+z)/3);
end.
Пример:
2.4 8.7 5.4
5.5
2.
begin
var l:=ReadReal;
var g:=9.81;
writeln('t = ',2*pi*sqrt(l/g));
end.
Пример:
0.5
t = 1.41850335344289
3.
begin
var r:=ReadReal;
writeln('C = ',2*pi*r,' S = ',pi*r*r);
end.
Пример:
3
C = 18.8495559215388 S = 28.2743338823081
4.
begin
var (x,y,z):=ReadReal3;
writeln('a = ',(2*x+3*y-z)/(3+2*x));
writeln('b = ',(sqrt(x)+4)/(abs(y)-2));
end.
Пример:
7 -3 5
a = 0
b = 6.64575131106459
5.
begin
var t:=ReadReal;
var g:=abs(2.4*t-100)+abs(t-2.2)-sqrt(t*t/(18+abs(t)));
writeln('g = ',g);
end.
Пример:
5
g = 89.7574279297146