Ответ:
163 (10)= 10100011(2)=243(8)= А3 (16)
401 (10)=110010001(2)=621(8)=191(16)
158(10)=10011110(2)=236(8)=9Е(16)
351(10)=101011111(2)=537(8)=15F(16)
99 - 1 = 98
98 / 2 = 49
49 - 1 = 48
48 - 1 = 47
Ответ: 2122.
var s,p: string;
i: integer;
begin
write('Введите текст: ');
readln(s);
p:=s;
for i:=1 to length(s) do
if (s[i]='.') or (s[i]='!') or (s[i]='?') or (s[i]=',')
then delete(p,pos(s[i],p),1);
write('результат: ',p);
end.