Ответы
Ответ дал:
0
Если правильно понял задачу
program Znanija;
var
s:string;
i:integer;
begin
s := 'FOR I=1 TO N';
for i:=1 to 11 do
write(ord(s[i]), ' ');
end.
Результат: 70 79 82 32 73 61 49 32 84 79 32
program Znanija;
var
s:string;
i:integer;
begin
s := 'FOR I=1 TO N';
for i:=1 to 11 do
write(ord(s[i]), ' ');
end.
Результат: 70 79 82 32 73 61 49 32 84 79 32
Вас заинтересует
2 года назад
7 лет назад
7 лет назад
10 лет назад