uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a+b);
writeln(a-b);
writeln(a*b);
writeln(a/b:4:1);
readln;
end.
Đúng 1
Bình luận (0)
Môn học
Chủ đề / Chương
Bài học
Chủ đề
Viết chương trình nhập vào hai số tự nhiên a và b. Tính tổng (𝑎+𝑏), hiệu (𝑎−𝑏), tích (𝑎∗𝑏), thương (𝑎/𝑏) (lấy 1 chữ số lẻ) của hai số đó?
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a+b);
writeln(a-b);
writeln(a*b);
writeln(a/b:4:1);
readln;
end.