Рассмотрим перевод программы расчета доли отгона в нефтепереработке

Фрагмент программы на Делфи:

program otgond;

{$APPTYPE CONSOLE}

uses rewob,pechob,rewlib,rewl,tepsvval,SysUtils, Windows, Messages,
Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
VAR a:string [44];c:string[11];disk:string[5];
tn,rk1,d15,tb,toct,b:real;
i:integer;
procedure r;

//Здесь r - процедура вывода строки исходных данных в таблице. Она будет использоваться позднее.

var n:integer;
begin
i:=i+1; n:=length(c);
writeln(outfl);write(outfl,'I',i:3,'I',a,' ':44-length(a),'I',b:11:4,'I',c,' ':11-n,'I');
end;

begin // начало программы
disk:='c:\d\'; //Путь к диску, где нах-ся папка с файлом с исходными данными
assign (inpfl,disk+'otgond\otgon.dan');reset(inpfl);// Папка с исходными данными

writeln('ЧТЕНИЕ ФАЙЛА');
while not (eof(inpfl))do begin // начало считывания данных из файла OTGON.dan
read(inpfl,if1,iy,n2,n5); //вводим переменные if1,iy,n2,n5

Теперь будем делать эту программу на Python: Выберем в пункте меню FILE/NEWFILE:

Пишем соответствующий код на PYTON: