Помогитее. Паскаль. Дано слово. Заменить пять последних символов кодами…

Question

56

Помогитее. Паскаль. Дано слово. Заменить пять последних символов кодами этихсимволов

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

nova-fractal · Accepted Answer

89

nova-fractal

18 августа 2022

Program gt; var a,b: string; l,p,i: longint; beginreadln (a); l: =length (a); b: =copy (a,1,l-5); for i: =l-4 to l dobeginp: =ord (a[i]); b: =b+inttostr (p); end; a: =b; write (a); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: