Написать программы: для вывода переменных тел integer, real, char, string, boolean

Var
  i:integer;
  p:real;
  b:Boolean;
  s:string;
  c:char;
begin
  i:=5;
  p:=3.141593;
  b:=true;
  s:='Привет!';
  c:=chr(200);
  writeln('integer ',i);
  writeln('real ',p);
  writeln('Boolean ',b);
  writeln('string ',s);
  writeln('character ',c)
 end.

Результат работы программы:

integer 5
real 3.141593
Boolean True
string Привет!
character И