Язык:
Русский
English
{ Пример программы для функции Round }
begin
WriteLn(1.4, ' округлённо = ', Round(1.4));
WriteLn(1.5, ' округлённо = ', Round(1.5));
WriteLn(-1.4, ' округлённо = ', Round(-1.4));
WriteLn(-1.5, ' округлённо = ', Round(-1.5));
end.
WriteLn(1.4, ' округлённо = ', Round(1.4));
WriteLn(1.5, ' округлённо = ', Round(1.5));
WriteLn(-1.4, ' округлённо = ', Round(-1.4));
WriteLn(-1.5, ' округлённо = ', Round(-1.5));
end.