Photomatch
Объяснение:
Направляешь камеру, фоткаешь, оно решает.
program a1;
var y, a, x: real;
begin
readln (x);
readln(a);
x:= sqrt (sqr (x) +1);
y := x/5*a;
writeln(y);
end.
Надеюсь "
