Вычисления в виде таблицы

[Legky]

Всем доброго времени суток.
Помогите отладить прогу (среда Delphi pascal).
Набор и отладка программы с циклом
Цель работы: получение практических навыков программирования
задач с использованием операторов циклов.
Задание:
Разработать схему алгоритма и написать программу, реализующую следующие действия:

Напечатать таблицу вида
X Y=kx+b
X1
……….
X2 …………
для заданных k, X1 и X2.

program tabl;
{$APPTYPE CONSOLE}
uses
SysUtils;

var i,x,y,n,k,b:integer;
begin
{ TODO -oUser -cConsole Main : Insert code here }
writeln('Kol-vo elementov v tablice');
readln(n);
write('Vvedite znachenie k=');
readln(k);
write('Vvedite znachenie b=');
readln(b);
writeln('Vvedite X');
Writeln;
writeln('X ',' ',' Y');
for i:=1 to n do begin
read(x);
y:=k*x+b;
write(' ',y);
writeln;
end;
readln;readln;
end.

Проблема в том, что таблица получается в такои виде


Как сделать, чтобы Х и У выводились в одну строку??
Заранее спасибо.

[bananasus]

А не проще создать форму, взять компонент TStringGrid и выводить значения в цивилизованном виде, а не в консоли.

[Legky]

Если б умел, то обязательно бы зделал