Преобразуйте в код ascii выражение: FOR I=1 TO N

0 голосов
31 просмотров

Преобразуйте в код ascii выражение: FOR I=1 TO N


Информатика (14 баллов) | 31 просмотров
Дан 1 ответ
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 

(778 баллов)