Question

1.   
Вывести
на экран таблицу соответствия единиц массы (г, кг). Начальное и конечное
значения вводятся с клавиатуры. задача  в паскаль пж

Answer 1

var a,b:integer;
begin
read(a,b);
for a:=a to b do
writeln(a,'гр=',a/1000,'кг');
end.