Ответы
Ответ дал:
0
//Наверное, мелся ввиду Unicode
var s:string;i:integer;
begin;
s:='"Скоро новыий год!"';
for i:=1 to length(s) do
write('-',ordunicode(s[i]));
end.
Вывод:
34-1057-1082-1086-1088-1086-32-1085-1086-1074-1099-1080-1081-32-1075-1086-1076-33-34
var s:string;i:integer;
begin;
s:='"Скоро новыий год!"';
for i:=1 to length(s) do
write('-',ordunicode(s[i]));
end.
Вывод:
34-1057-1082-1086-1088-1086-32-1085-1086-1074-1099-1080-1081-32-1075-1086-1076-33-34
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад