Viết chương trình nhập vào 3 số a,b,c từ bàn phím tính giá trị biểu thức và in kết quả ra màn hình. a, ( a+b)/c b, 20 div 3 + a^2 c, 10 mod 3+(a+c)^2

0 bình luận về “Viết chương trình nhập vào 3 số a,b,c từ bàn phím tính giá trị biểu thức và in kết quả ra màn hình. a, ( a+b)/c b, 20 div 3 + a^2 c, 10 mod 3+(a+c)^2”

1. Program BTT;
   Uses crt;
   Var a,b,c: longint;
       ca,cb,cc: extended;
   Begin
           Clrscr;
           Write(‘Nhap a, b, c: ‘); Readln(a,b,c);
           ca:=(a+b)/c;
           cb:=20 div 3 + sqr(a);
           cc:=10 mod 3 + sqr(a+c);
           Writeln(‘Cau a: ‘,ca:0:2);
           Writeln(‘Cau b: ‘,cb:0:2);
           Write(‘Cau c: ‘,cc:0:2);
           Readln
   End.

   Bình luận

2. bàia

   program etf;

   var a,b,c:integer;

   begin

   write(‘nhap gia tri cho a’);readln(a);

   write(‘nhap gia tri cho b’);readln(b);

   write(‘nhap gia tri cho c’);readln(c);

   write(‘(a+b)/c=’);write((a+b)/c);

   write(‘20 div 3 + (a.a)’);write(20 div 3 + (a.a);

   write(’10 mod 3+((a+c).(a+c))’);write(10 mod 3+((a+c).(a+c)));

   end.

   Bình luận