Что такое байт, килобайт, мегабайт, гигабайт. как байт, килобайт, мегабайт, и гигабайт связаны между собой. сколько баитов состовляют одна вторых килобайта сколько школьных учебников емкостью 350 килобайтов можно разместить на трехдюймовой дескете

Байт - единица измерения информации в ЭВМ.
1 Байт = 8 Бит.
1 КилоБайт = 1024 Байт
1 Мегабайт = 1024 КилоБайт
1 Гигабайт = 1024 Мегабайтам.

Одна вторая Килобайт, это 512 Байтов.
ответ на второй вопрос: 3

Private Sub Command1_Click()
Form1.Shape1.Visible = True
Form1.Shape2.Visible = True
Form1.Shape3.Visible = True
Form1.Shape4.Visible = True
Form1.Shape5.Visible = Falce
Form1.Shape6.Visible = Falce
Form1.Shape7.Visible = Falce
Form1.Shape8.Visible = Falce
End Sub
Private Sub Command2_Click()
Form1.Shape5.Visible = True
Form1.Shape6.Visible = True
Form1.Shape7.Visible = True
Form1.Shape8.Visible = True
Form1.Shape1.Visible = Falce
Form1.Shape2.Visible = Falce
Form1.Shape3.Visible = Falce
Form1.Shape4.Visible = Falce
End Sub

Var x1,y1,x2,y2,v1,v2:real;
begin
  writeln("введите количество метров пробегания жирафа");
  read(y1);
  writeln("введите, за сколько секунд он должен пробежать");
  read(x1);
  writeln("введите количество метров пробегания зайца");
  read(y2);
  writeln("введите, за сколько секунд он должен пробежать");
  read(x2);
  v1:=y1/x1;
  v2:=y2/x2;
  if v1>v2 then 
  begin
     writeln("жираф чемпион");
  end
  else if v1<v2 then 
  begin
     writeln("заяц чемпион");
  end
  else
  begin
    writeln("победила дружба);
  end;
end;