Привет, мне нужна помощь с домашней работой. Мое домашнее задание во вложениях.двойка выходит

1

Ответы и объяснения

2013-04-14T18:45:37+04:00

var
  i: integer;
  r: real;
  ch: char;
  str: string;
  bool: boolean;
  b: byte;
begin
  i := 1058;
  r := 48.5;
  ch := 'P';
  str := 'Life';
  bool := false;
  b := 36;

  writeln('I (Целая) : ', i);
  writeln('R (Вещественная) : ', r);
  writeln('Ch (Символьная) : ', ch);
  writeln('Str (Строковая) : ', str);
  writeln('Bool (Логическая) : ', bool);
  writeln('B (Целая беззнаковая) : ', b);
end.