Строчки в паскаль

[dimaua2]

Program Reznik;
uses CRT;
var a,b,c,d,e,f,g,n,m,z:integer;
begin
clrscr;
write('a=');
read(a);
write('b=');
read(b);
write('c=');
read(c);
write('d=');
read(d);
write('e=');
read(e);
write ('f=');
readln(f);
write ('g=');
readln(g);
write ('n=');
readln(n);
write ('m=');
readln(m);
z:=a*(c*m+f*n)-d*(b*m-c*n)+g*(b*f+c*e);
writeln('z=', z:3);
readln;
end.

Хочу что бы числа типо а= б= писались в строчку а они один под одним..не могу вспомнить как это сдлеать...

[Poma][a]

эм... не понял.... вы спрашивали про это ?

Write ( ' a = ');
ReadLn (a);

[dimaua2]

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

[SlavaSSU]

наверное, только если сначала ввести, а потом вывести

[s-andriano]

По завершении ввода числа вы ведь нажимаете на Enter?
Стандартная процедура ввода с отображением на экран просто честно отрабатывает символ перевода строки.
Единственный способ избежать этого - писать собственную процедуру ввода. Например, с использованием readkey.

[eoln]

Есть способ с gotoxy

  x := WhereX;
  y := WhereY;
  write('a= '); readln(a);
  str(a, s); x := x + 5 + length(s);
  GotoXY(x, y);
  write('b= '); readln(b);
  str(b, s); x := x + 5 + length(s);
  GotoXY(x, y);
  write('c= '); readln(c);

Если вводить "правильные" целые числа, то всё будет хорошо. С вещественными числами будет уже не так красиво.