Загрузка данных

var i,sum,jislo: integer;
begin

end.