Помогите написать программу паскаль с помощью оператора for

[Вадим6297]

Помогите написать программу паскаль с помощью оператора for:вывести алфавит с порядковыми номерами.
Что-то вроде
А1
Б2...и т.д

[Alex11223]

Смотрите функции chr и ord.

[Dvoishnik]

ВНИМАНИЕ!! КРОСПОСТ!!

[newerow1989]

var i:integer;
begin
   For i:=224 to 255 do
      Writeln(Char(i),' ',i-223);
   Readln;
end.

Сойдет?

[Алексей_2012]

Спасибо = весы - слева

var bukva:Char;
i:ShortInt;
begin
  memo1.lines.Clear;
  Memo1.Font.Color:=clLime;
  Memo1.Color:=clBlack;
  form1.Color:=clGray;

  i:=1;

  for  bukva:='А' to 'я' do
  begin
   Memo1.Lines.Add(bukva+inttostr(i));
   if (i=32) then
   begin
     i:=0;
     Memo1.Lines.Add('');
   end;
   Inc(i);
  end;

[Alex11223]

Спасибо = весы - слева

Не могут новички репутацию повышать. Так что можешь не решать за них задачи

[min@y™]

Ой! Обожаю пиписьками меряться!

Спасибо = весы - слева <----> Весы = спасибо + слева.



Скачай прогу, удиви препода!