Viết chương trình thực hiện các việc sau bằng passcal: 1, Nhập vào 2 số a,b 2, Hiển thị 2 số vừa nhập 3, Tính tổng a+b 4, Tính hiệu a-b 5, Tính tích a*b 6, Tính thương a/b 7, Kiểm tra xem số nào lớn hơn 8, Kiểm tra xem a chia hết cho b hay không?

2 câu trả lời

Anh đã làm và gửi kèm một tấm ảnh bên dưới em vào xem nha!Chúc em học tốt!

uses crt;

var a, b : integer;

begin

clrscr;

write('Nhap hai so a, b : '); readln(a, b);

writeln('Tong hai so = ', a + b);

writeln('Hieu hai so = ', a - b);

writeln('Tich hai so = ', a * b);

writeln('Thuong hai so = ', a / b : 2 : 1);

if a <> b then if a > b then writeln('a lon hon b')

else writeln('b lon hon a') else writeln('a bang b');

if a mod b = 0 then writeln('a chia het cho b')

else writeln('a khong chia het cho b');

readln

end.