Расположите в правильном порядке строки программы, вычисляющей периметр и площадь параллелограмма: 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
Ну, зачем девушкам программмировать? :)
Ладно, я хоть и 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
Удачи :)