Отправлено ShiphT 10 января 2006 г. 14:36 В ответ на: Ну хорошо убедили. Но всё равно, попрошу Вас ту же задачку представить на Паскале ("Если человек просит яблоко, зачем предлагать ему картошку, убеждая что она более сытная?") отправлено Доктор ТуамОсес 10 января 2006 г. 13:41

function BIN2ASCII(var cIn :byte);
Begin
   if cIn > 9 then
      BIN2ASCII = cIn + ('А' - 10)
   else
      BIN2ASCII = cIn + '0';
End.

• "Естессно, возможна ошибка". И действительно ошибка есть. Нельзя в Паскале от значения символьного типа отнять значение целого типа. На то он и Паскаль. ..Строгая типизация ити её мать — Доктор ТуамОсес   (10.01.2006 15:18 62.118.143.94, пустое)

E-mail: info@telesys.ru