Даны два действительные числа.Вывести первое число,если оно больше второго,и оба числа если это не так — Pascal(Паскаль)

program test;
 
   var
      q,w : integer;
 
begin
write('введите первое: ');
readln(q);
write('введите первое: ');
readln(w);
if (q>w) then write(q)
else write(q,',',w);
end.