Forum Index > Coș cu teme șterse > Soft > Pascal

#0 by paska_00 (Power User) (0 mesaje) at 2011-12-20 17:33:26 (714 săptămâni în urmă) - [Link]Top
cine stie bine pascalu? Am nevoie de ajutorul vostru :(
am urmatoarea problema: Sa se calculeze ecuazia  Z=|a+b*2-c|+sqrt(c*a - sqr(b))    dupa urmatoarea conditie x=c<y−2 ; intervalul min=10.
prin 3 metode: FOR, WHILE, REPEAT.

Va multumesc anticipat!

P.S. eu am incercat sa fac da ceva nu fac corect
cod
program PC;
var y,a,b,c,x:integer;
    Z:real;
    label M;
  Begin
M: writeln('Introdu a,b,y,x:');
    write('a=');
    readln(a);
    write('b=');
    readln(b);
    write('x=');
    readln(x);
    write('y=');
    readln(y);
      If (x-(y-2))>10 then
        begin
          writeln('Rezultatele:');
          For c:=x downto y-2 do begin
          Z:=abs(a+b*2-c)+sqrt(c*a-sqr(b));
          writeln('Z=',Z);
        end;
        end
      Else
      begin
      writeln('Eroare');
      goto M;
      end;
      readln
    END.
ÎnchideЗакрыть



Mesaj util ?   Da   0 puncte

1
<< Precedenta      Următoarea >>

#1 by sk07 (sleepwalker) (0 mesaje) at 2011-12-20 18:58:00 (714 săptămâni în urmă) - [Link]Top
http://www.torrentsmd.eu/forum.php?action=viewtopic&topicid=68227&page=247 vezi ultimul mesaj.


Mesaj util ?   Da   0 puncte

1
<< Precedenta      Următoarea >>

Forum Index > Coș cu teme șterse > Soft > Pascal

Această temă este închisă. Nu puteţi posta mesaje noi.


Navigare rapidă:


Comunitatea digitală din Moldova. Să adunăm și să organizăm conținutul autohton de pe întreg internet pe un singur site web.