Написать программу про радиус сферы в PascalABC.NET

// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!

procedure PrintArr(f:Text; a:array of integer);
begin
  foreach var x in a do Write(f,x,' ');
  Writeln(f)
end;

begin
  var fin:=OpenRead('input.txt');
  var n:=ReadlnInteger(fin);
  var a:=new integer[n];
  for var i:=0 to n-1 do Read(fin,a[i]);
  var fout:=OpenWrite('output.txt');
  fin.Close;
  PrintArr(fout,a);
  var b:=a.Where(x->x.IsEven).ToArray;
  PrintArr(fout,b);
  var c:=a.Where(x->x.IsOdd).ToArray;
  PrintArr(fout,c);
  fout.Close
end.

Dpi - аббревиатура английского Dots Per Inch - "точек на дюйм".

Как известно, растровое (точечное) изображение формируется из отдельных элементов. На экране монитора и в графических пакетах эти элементы называют пикселями (pixel - PICture'S ELement -> PIX ELement - элемент изображения). А на печати, так уж повелось еще с докомпьютерных времен, элементы изображения зовутся точками.

Чем больше точек в изображении, тем оно качественнее. Плотность печати на принтере - это количество точек, которые принтер печатает на отрезке определенной длины, обычно равном 1 дюйму. Дюйм - это внесистемная неметрическая единица длины, исторически пришедшая из Англии. Английский дюйм (inch) равен 25.4 мм.

Стандартная плотность печати для качественного изображения должна составлять не менее 300 dpi, т.е. на каждом дюйме принтер размещает 300 точек. Такая плотность принята, например, при печати фотографий в ателье. Высококачественная печать oсуществляется с плотностью 600 и даже 1200 dpi.