Pascal ABC
__________
Var
a,b,n:integer;
Begin
Readln(n);
While (a<>n) or (b<>n) do begin
Read(a);
if a=n then write('1') else begin
Read(b);
if b=n then write('2');
end;
end;
end.
Ответ:
1,09375 сек
Объяснение:
560 кбайт = 560 * 8 / 1024 = 4,375 мбит
4,375 мбит / 4 мбит/сек = 1,09375 сек
Наполнить 5 литров, потом перелить все в 3-ех литровую банку. Остается два литра. Повторить, и будет 4 литра, тогда нужна еще одна емкость, которой нет. Не знаю, что еще можно придумать
Double a,b,x,k;
k = ((pow(a+b,3)-cos(x*x))/(tan(x)*exp((-3)*x)+0.00275)+(sqrt(fabs(a+b)))/(<span>pow(sqrt(a+b), 1/3<span>)</span></span>));
В именах не могут быть пробелы и '
myname
N2
K1L2