program variablen; var i:integer; r:real; b:boolean; s:string; begin i:=47; r:=-34.5246; b:=false; s:='Pumukel'; writeln(i); writeln(r); writeln(b); writeln(s); end.