< >

Напишите программу, которая выводит на экран коды символов 'A', 'B', 'C' , ...., 'Z'.

Ответы

Ответ дал: archery
0

var i:integer;

s:string;

Begin

  s:="ABCDEFGHIJKLMNOPQRSTUVWXYZ";

  for i:= 1 to length(s) do

    writeln(s[i],' = ', ord(s[i]));

End.

Похожие вопросы
Английский язык
2 года назад
Поставьте общий вопрос к следующим предложениям: John gets up at 6 o'clock in the morning. His office is near the metro station. Her friend lived in London. We shall have dinner at home. She has
Русский язык
2 года назад
Фонетическое чередование звуков имеется в словах... 1) слуга-слуг 2) друг-дружный 3) сапог-сапожник 4) благой-блаж Обосновать ответ.
Литература
7 лет назад
СРОЧНОО!ТЕМА ПРОИЗВЕДЕНИЯ ПЛАТОНОВА "СОЛДАТСКОЕ СЕРДЦЕ"
Математика
7 лет назад
помагите пожалуйста номер 10,11,12,13
История
10 лет назад
Найти ошибки ! Хитроумный Одиссей мечтал услышать сладкозвучное пение сирен но ему не удалось ,спутники Одиссея в страхе за его жизнь привязали царя Итаки к мачте и заклевали ему уши воском.
Математика
10 лет назад
На пруду плавали 40 лебедей. Из них 30 были белыми. Какую часть всех лебедей составляли белые лебеди?
Математика
10 лет назад
в парке посадили13 дубков а березок на7 деревьев меньше сколько всего деревьев посадили в парке
Алгебра
10 лет назад
1) Докажите тождество, указав область его определения: 1+cos(b)-sin(b)-ctg(b)=(1-ctg(b)(1-sin(b))   2) Найдите sin(a)-cos(a), если sec^2(a)+cosec^2(a)=6.25 и a(альфа) принадлежит (п; 5п/4)