HOME ПРИМЕРЫ THANKS НОВИЧКАМ ДОКИ LINKS JavaScript Mail


 
В этот день много лет назад...
23 октября. В 1943 году (75 лет назад) - Подводная лодка "Звон" в своем пятом боевом походе обнаруживает японский конвой, состоящий из трех больших танкеров и двух транспортов. Охрану несет лишь один эсминец, который ходит кругами, обследуя район. Подводной лодке удается поднырнуть к самому конвою так, что она смешивается с кораблями японцев, и эсминец не может засечь ее радиолокатором. Почти в упор "Звон" дает залп пятью торпедами по танкерам, и поражает все три судна. Затем лодка собирается поразить транспорт, но он резко разворачивается и идет на таран. У лодки, зажатой между пылающими танкерами и транспортом, времени, чтобы уйти под воду, уже не остается. Нос транспорта нависает над "Звоном". Дальнейшее командир лодки капитан О`кейн описывает следующим образом: "Это было как в мелодраматическом боевике. "Звон" метнулся прямо внутрь циркуляции транспорта, и, спасая корму, я приказал положить руль лево на борт. Транспорт открыл огонь из пушек и пулеметов. Однако снаряды проносились над нашими головами, не задевая лодки. Положение было отчаянным. Тут я взглянул на корму и увидел, что, на наше счастье, транспорту придется продолжить поворот, чтобы избежать столкновения с грузовым судном, которое также шло на таран. Наскоро прицепившись, я выстрелил веером торпеды из кормовых аппаратов с углом растворения, перекрывавшим длину обеих целей. В этот же момент грузовое судно врезалось в правую раковину транспорта. Столкновение и четыре торпеды "Звона" решили судьбу грузового судна: оно затонуло почти мгновенно, уйдя под воду с большим дифферентом на нос, а транспорт застыл на месте, задрав корму под углом в тридцать градусов". Таким образом, за один бой лодке удалось уничтожить пять кораблей.
 
 

Turbo Pascal Documentation

Функция Round


     Функция: Округляет значение вещественного типа до  зна-
чения целого типа.
     Описание: Round(x : real)
     Тип результата: Длинный целый (longint).
     Примечания: Параметр x представляет собой выражение ве-
щественного типа. Функция Round возвращает значение длинного
целого типа, которое является значением  x,  округленным  до
ближайшего целого числа. Если значение x находится точно по-
середине между двумя целыми числами,  то  результатом  будет
число  с большим обсолютным значением. Если округленное зна-
чение x не соответствует  диапазону  представления  длинного
целого типа, то во время выполнения происходит ошибка.
     Отличия: В версии 3.0 Турбо-Паскаля функция Round возв-
ращает целое значение.
     Прочее: См. также функции Trunc, Int.




HOME