среда, 13. март 2013.

1# Izracunaj formulu w=(x^2+y^2)^2


program mat4;
uses crt;
 var
   x,y:integer;
   w:real;

   //w=(x^2+y^2)^2

  begin
   clrscr();
   writeln('izracunaj formulu');
   writeln('w=sqr(sqr(x)+sqr(y))');
   writeln('unesi promenjive');

   write('x='); readln(x);
   write('y='); readln(y);

   w:=sqr(sqr(x)+sqr(y)) ;
   writeln('w=sqr(sqr(x)+sqr(y))=',w:10:4);

   readln();
 end.

Нема коментара:

Постави коментар