Написать программы:Для вывода переменных тел 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 И