Saw~

Британские ученые разгадали загадку о курице и яйце

Британские ученые дали ответ на вопрос, который многие годы ставил в тупик самые блестящие умы человечества: что появилось первым — курица или яйцо. Согласно данным последних исследований, первой все-таки появилась курица. Ученые из университетов городов Шеффилда и Уорика провели работу с помощью мощного компьютера, который смоделировал на генетическом уровне процесс появления куриного яйца.

Как отмечают британские мужи науки, ключевую роль в его формировании играет протеин овоклединин-17 или ОС-17. Он участвует в создании яичной скорлупы. Без этого протеина, который находится в организме курицы, появиться яйцо не может. "Данный протеин был известен уже давно, однако только сейчас мы установили, что он напрямую связан с формированием яйца и контролирует данный процесс", — заявил один из руководителей работ профессор Колин Фримэн.

Также ученый отмечает, что у различных видов птиц существуют различные варианты данного протеина, хотя они и выполняют сходные функции. Таким образом, курицы обладают уникальной формой ОС-17, без которой известное всем куриное яйцо появиться на свет не может. В результате британские ученые смогли ответить на считавшийся неразрешимым научный вопрос, установив, что первой появилась курица, а лишь затем яйцо.

TolkienDRR

Мне надо в ввиде калькулятора!

Там должен быть один Edit!

Помогите запрограммировать mod, div, and, not, xor, or

Оч надо до пятницы!

TolkienDRR

Твой код работает только если ты вводишь с клавиатуры, а мне надо чтобы с клавиатуры и кнопкой!

сделал не помогло!

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
case key of
#8,'0'..'9',',':;
else key:=chr(0);
end;
If (Key=',') or (Key='.') then begin
   begin
     if Key <> DecimalSeparator
        then Key := DecimalSeparator;
     if Pos(DecimalSeparator,Edit1.text) <> 0
        then Key := Chr(0);
   end;
end;
end;

Надо запрограммировать калькулятор, а точнее только запятую!

1). Чтобы запятая нажималась один раз!

2) Чтобы если её удалиш Backspace'oм то её можно будет ещё раз поставить!

*157

Самая лучшая серия 12 имхо!

Отличный сериал всем советаю!