Trunc.PAS

Language:
Русский
English

  {Trunc.PAS}
  ▀▀▀▀▀▀▀▀▀▀▀▀▀
 {Sample code for the Trunc function.}

  uses WinCrt;

  begin
    Writeln(1.4, '  becomes ', Trunc(1.4));
    Writeln(1.5, ' becomes ', Trunc(1.5));
    Writeln(-1.4, ' becomes ', Trunc(-1.4));
    Writeln(-1.5, ' becomes ', Trunc(-1.5));
  end.

Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //