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ố đó

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.