Паскаль абс 1.символы вводятся с клавиатуры до символа - вопрос №99291641 от dedchik 20.12.2022 01:00

Question

Информатика: Паскаль абс 1.символы вводятся с клавиатуры до символа ‘.’ (точка). вывести символы, предшествующие каждому из введенных. (ввод: feui56hg вывод: edth45gf)

dedchik · Answer

var k:char; s:string; BEGIN s:= ; repeat read(k); s:=s+chr(ord(k)-1) until k= . ; delete(s,pos( - ,s),1); writeln(s); end....