Question

Расположите в правильном порядке строки программы, вычисляющей периметр и площадь параллелограмма: 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

Answer 1

Program pr;
uses crt;
var
h,a,b,g,p,s:integer;
begin
clrscr;
a:=6;b:=3;h:=4;
p:=2*(a+b);
s:=a*h;
writeln('p=',p,' s=',s);
readln;
end.