I=i*f*S*t
3500*1024*8=16*3200*1*t
t=560
Using System;
public class Test
{
public static void Main()
{
double r, x, y;
Console.WriteLine("r = ");
r = double.Parse(Console.ReadLine());
Console.WriteLine("x = ");
x = double.Parse(Console.ReadLine());
if (x<=0) y = -0.5*x;
else if (x<=r) y = -Math.Sqrt(4-x*x)+2;
else if (x<=2*r) y = Math.Sqrt(4-(x-2)*(x-2));
else y = -x+2*r;
Console.WriteLine("y = " + y);
Console.ReadLine();
}
}
Пример:
<span>r = 2
x = 3
y = 1.73205080756888</span>
var
n, d, min: integer;
begin
read(n);
n := abs(n); // Если введено отрицательное
min := 10;
while n > 0 do
begin
d := n mod 10;
n := n div 10;
if d < min then
min := d;
end;
write(min);
end.