Меню сайта

Задача №1

Дан символ —C. Вывести его код(то есть его номер в кодовой таблице).


Program stroka1-

Var a:byte-

b:char-

begin

b:=’C’-

a:=ord(b)-

writeln(‘код равен ­’,a)-

readln-

end.

Категория: Строки | Дата: 19.01.13

Меню раздела
Блок