Помогите решить, 18+38 mod 32

var A,B,C,S: integer; begin A:=18; B:=38; S:=A+B; C:= S mod 32; writeln('18+38 mod 32 = ',C); end.