Page 1 of 1

Паскаль :)

Posted: 2013-09-30 19:56:29
by Beltek
помогите плиз: Напишите на языке Паскаль программу вычисления y по формуле: y = ( 1- x2 + 10x4 )2, где x - данное целое число. . Расположите в правильном порядке строки программы, вычисляющей периметр и площадь параллелограмма: 1) S:=a*h; 2) end. 3) program pr; 4) p:=2*(a+b); 5) Uses crt; 6) var a,b,h,p,s: integer; 7) readln; 8) Writeln(‘p=’,p,’ s=’,s); 9) a:=6;b:=3;h:=4; 10) clrscr; 11) begin

Re: Паскаль :)

Posted: 2013-09-30 20:33:39
by Juicy Fruit
Beltek wrote:помогите плиз: Напишите на языке Паскаль программу вычисления y по формуле: y = ( 1- x2 + 10x4 )2, где x - данное целое число. . Расположите в правильном порядке строки программы, вычисляющей периметр и площадь параллелограмма: 1) S:=a*h; 2) end. 3) program pr; 4) p:=2*(a+b); 5) Uses crt; 6) var a,b,h,p,s: integer; 7) readln; 8) Writeln(‘p=’,p,’ s=’,s); 9) a:=6;b:=3;h:=4; 10) clrscr; 11) begin

http://stealth.od.ua/Doc:Manual/Scripting/Pascal
Минут 10 сравнения строчек и у тебя будет то, что тебе нужно)

Re: Паскаль :)

Posted: 2013-10-02 19:59:41
by Beltek
Все еще жду помощи!

Re: Паскаль :)

Posted: 2013-10-09 11:18:38
by ZeroDX
как-то так, но я двоиШник

Code: Select all

 3) program pr;
 5) Uses crt;
 6) var a,b,h,p,s: integer;
11) begin
 9) a:=6;b:=3;h:=4;
 1) S:=a*h;
 4) p:=2*(a+b);
 10) clrscr;
 7) readln;  Writeln(‘p=’,p,’ s=’,s);
 2) end.