viết chương trình nhập vào 3 số nguyên a b c của bàn phím sau đó in ra tích của ba số đó

0 bình luận về “viết chương trình nhập vào 3 số nguyên a b c của bàn phím sau đó in ra tích của ba số đó”

1. uses crt;

     var a, b, c, tich: integer;

   begin

     clrscr;

     write(‘Nhap a: ‘); readln(a);

     write(‘Nhap b: ‘); readln(b);

     write(‘Nhap c: ‘); readln(c);

     tich:=a*b*c;

     writeln(‘Tich cua 3 so a, b, c la: ‘, tich);

     readln

   end.

   Bình luận

2. uses crt;
   var a,b,c:longint;
   begin
   clrscr;
   write(‘a=’);readln(a);
   write(‘b=’);readln(b);
   write(‘c=’);readln(c);
   write(a,’x’,b,’x’,c,’=’,a*b*c);
   readln;
   end.

   Bình luận