Составить программу для определения минимума для двух значений на языке pascal

vara,b :integer;BeginRead(a,b);Write('Меньшее -> ');if (a < b) then Writeln(a) else writeln(b);end.