1) 1000/1024=0,97 кб 1000 байт < 1 кб
2)220/1024=0,214 Кб 1/2 кб = 512 кб 220 < 1/2
3)1 мб = 1024 кб 1 < 1500
4)8192/8/1024 = 1 кб 1=1
Можно так: складываем. Делим пополам - получаем среднее. Находим разность между заданными числами и средним. Если разность отрицательная - то меньшее число, если разность положительная - то большее.
Если тебе разрешили пойти в цирк, то ты идешь туда, иначе, остаешься дома. Если в кассе остались билеты, то ты покупаешь их, иначе, возращаешься домой. Если у тебя хватает денег, то ты покупаешь билет, иначе, возращаешься за деньгами.
ps если тебе в это время по-надобилось пойти домой, то ты идешь тобой, иначе продолжаешь действия )
Паскаль
var a,b,c,d:integer; x,y:real;
begin
writeln(a);
writeln(b);
writeln(c);
readln(a);
readln(b);
readln(c);
d:=b*b-4*a*c;
if d>0 then begin
x:=(-b+sqrt(d))/(2*a);
y:=(-b-sqrt(d))/(2*a);
writeln(x,y);
end;
if d=0 then begin
x:=-b/2*a;
writeln(x);
end;
if d<0 then begin
writeln('Уравнение не имеет корней')
end;
end.
