viết chương trình tính giá trị biểu thức A=x+y ²-1

0 bình luận về “viết chương trình tính giá trị biểu thức A=x+y ²-1”

1. uses crt;

   var a,x,y: integer;

   begin

   clrscr;

   write (‘nhap x: ‘);  readln (x);

   write (‘nhap y: ‘);  readln (y);

   a:=x+(y*y)-1;

   writeln (‘gia tri cua bieu thuc A la: ‘,a):

   readln;

   end.

   Bình luận

2. uses crt;
   var A,x,y:integer;
   begin
         clrscr;
         write(‘Nhap x: ‘);
         readln(x);
         write(‘Nhap y: ‘);
         readln(y);
         A:=x+(y*y)-1;
         write(‘Gia tri bieu thuc A: ‘,A);
         readln;
   end.

   Bình luận