Viết chương trình Pascal thực hiện các nhiệm vụ sau: - nhập vào 2 số nguyên dương từ bàn phím - xuất ra kết quả tính tổng của 2 số, kiểm tra tổng đó có chia hết cho 6 hay không?
2 câu trả lời
program bai_giai;
uses crt;
var a,b,tong:longint;
begin
clrscr;
write('nhap a,b:');readln(a,b);
tong:=a+b;
writeln(tong);
if(tong mod 6=0)then write(tong,' chia het cho 6')else write(tong,' khong chia het cho 6');
readln
end.
uses crt;
var a, b : integer;
begin
clrscr;
write('nhap hai so nguyen duong : ');
readln(a, b);
writeln('tong cua hai so : ', a + b);
if (a + b) mod 6 = 0 then
writeln('tong hai so chia het cho 6')
else writeln('tong hai so khong chia het cho 6');
readln
end.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
