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.
Нема коментара:
Постави коментар