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
Bài 1:
uses crt;
var n,i,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
i:=1;
Program baitap;
Uses crt;
Var a,b,s:integer;
Begin
Clrscr;
Write('Nhap 2 so nguyen duong:'); Readln(a,b);
s:=a+b;
Writeln('Tong cua 2 so do:',s);
If s mod 6=0 then writeln('Tong chia het cho 6')
else writeln('Tong 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
