Вывести через пробел номера букв
Где номера букв соответствуют их номерам в алфавите
А - 1, B - 2 и т.д.
Var
i: integer;
begin
for i := 1 to 26 do
write(chr(i + 64), -, i, );
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
