nhập 3 số nguyên a, b, c. Tính tổng, tích, trung bình cộng

0 bình luận về “nhập 3 số nguyên a, b, c. Tính tổng, tích, trung bình cộng”

1. var a,b,c: integer;

   TB: real;

   begin

   write (‘nhap vao so a=’);readln(a);

   write (‘nhap vao so b=’);readln(b);

   write (‘nhap vao so c=’);readln(c);

   TB:=(a+b+c)/3;

   write (‘trung binh cong của 3 so nguyen a,b,c:’,TB);

   readln;

   end.

    Đúng  Bình luận  Báo cáo sai phạm

   Bình luận

2. uses crt;

   var a,b,c:longint;

   begin

   clrscr;

   readln(a,b,c);

   writeln(‘Tong: ‘,a+b+c);

   writeln(‘Tich: ‘,a*b*c);

   write(‘TBC: ‘,(a+b+c)/3:0:2);

   readln

   end.

   Bình luận