С помощью программы паскаль вычислить площадь параллелограмма. Зарание спасибо!!!

var a, h: integer;
begin
    write('Введите a, h: '); readln(a, h);
    writeln('Площадь параллелограмма = ', a * h);
end.