Как округлить до сотых в паскаль​

пример

Pascal

const

r1 = 5.673;

r2 = 4.347;

r3 = 35.791;

var

r : real;

begin

// форматирование при выводе

WriteLn('r1 = ',r1:0:2);

WriteLn('r2 = ',r2:0:2);

WriteLn('r3 = ',r3:0:2);

Объяснение: