Problem ze stałymi i z liczbą 256

0

Jak przypisać liczbie literę? Nie działa takie coś: 10=A; albo 10='A';
Chcę, żeby zamiast 10 wyświetlało mi się A.

Program czasem wiesza się, gdy pracuje na liczbach pow. 255. Gdy napiszę po prostu 400+400, wtedy policzy, ale gdy:

{Wprowadzamy liczba; a:=0}
Repeat
a:=a+1;
b:=16*a;
Until b>liczba
Write(b-16);

to przy liczbach pow. 255 program albo źle policzy, albo się zawiesi. Co robić?

Na drugie już się domyśliłem. Zadeklarowałem zmienne jako byte, a one mają do 256. Trzeba word.

Ale co tymi const.?
0

Poczytaj o IntToHex lub coś takiego bo nie do końca rozumiem co chcesz osiągnąć:

const
  a = 10;

begin
  WriteLn(10+a);
end;

// lub

function ToLetter(const w :Word) :Char;
begin
  case w of
    10 :Result := 'A';
    20 :Result := 'B';
  end;
end;

function ToInt(const c :Char) :Word;
begin
  case c of
    'A' :Result := 10;
    'B' :Result := 20;
  end;
end;
0

Cholera, zapomniałem dodać, że to w Pascalu.

1 użytkowników online, w tym zalogowanych: 0, gości: 1