составить программу с диалогом для нахождения площади параллелограмма паскаль

Vara, h:integer;Beginwrite('Основание параллелограмма: ');readln(a);write('Высота параллелограмма: ');readln(h);writeln('Площадь параллелограмма: ', a*h);end.