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

Ну, зачем девушкам программмировать? :)

Ладно, я хоть и C++ знаю, но Pascal тоже изучал.

Неуверен, но должно быть так.

 

program pr;

uses ctr;

var a,b,c,h,p,s: interger;

begin

clrscr;

readln; // несовсем понимаю зачем это... бред... можно удалить.

a:=6;b:=3;h:=4;

p:=2*(a+b);

Writeln(‘p=’,p,’ s=’,s);

end.

 

Ответ: 3-5-6-11-10-7-9-4-8-2

 

Удачи :)