Расположите в правильном порядке строчки программы, вычисляющей периметр и площадь

Расположите в правильном порядке строчки программки, вычисляющей периметр и площадь параллелограмма:
1) S:=a*h; 6) var a,b,h,p,s: integer;
2) end. 7) readln;
3) program pr; 8) Writeln(p=,p, s=,s);
4) p:=2*(a+b); 9) a:=6;b:=3;h:=4;
5) Uses crt; 10) clrscr;
11) begin