Viết câu lệnh nếu a chia hết cho 3 thì xuất ra màn hình ^a chia het cho 3^
Viết chương trình nhập một số nguyên A từ bàn phím, sử dụng câu lệnh điều kiện để kiểm tra A xem có chia hết cho 3 hay không, sau đó đưa ra màn hình thông báo “A chia hết cho 3” hoặc “A không chia hết cho 3”.
a) Nếu b chia 2 dư 0 thì in ra màn hình “b là số chẵn”, ngược lại nếu b chia 2 dư 1 thì in ra màn hình “b là s hat o le^ prime prime
Cách 1: Viết hai câu lệnh điều kiện dạng thiếu:
if..
if...
if (b%2==0) cout<<"b la so chan";
if (b%2==1) cout<<"b la so le";
a) Nếu b chia 2 dư 0 thì in ra màn hình “b là số chẵn”, ngược lại nếu b chia 2 dư 1 thì in ra màn hình “b là s hat o le^ prime prime
Cách 1: Viết hai câu lệnh điều kiện dạng thiếu:
if..
if...
if (b%2==0) cout<<"b la so chan";
if (b%2==1) cout<<"b la so le";
a) Nếu b chia 2 dư 0 thì in ra màn hình “b là số chẵn”, ngược lại nếu b chia 2 dư 1 thì in ra màn hình “b là s hat o le^ prime prime
Cách 1: Viết hai câu lệnh điều kiện dạng thiếu:
if..
if...
if (b%2==0) cout<<"b la so chan";
else cout<<"b la so le";
Viết chương trình nhập vào dãy số có n số, xuất ra màn hình tổng các số chia hết cho 2.
Ví dụ nhập n = 5
1 2 3 4 6
Xuất: tong cac so chia het cho 2 la: 12
Var s,n,i,so:integer;
Begin
Write('Nhap so luong so n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i)readln(so);
If so mod 2 = 0 then s:=s+so;
End;
Write('Tong cac so chan la ',s);
Readln;
End.
Program HOC24;
var i,n,t: integer;
a: array[1..32000] of integer;
begin
write('Nhap n= '); readln(n);
for i:=1 to n do if i=n then readln(a[i]) else read(a[i]);
t:=0;
for i:=1 to n do if a[i] mod 2=0 then t:=t+a[i];
write('Tong cac so chia het cho 2 la: ',t);
readln
end.
Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có chia hết cho 3 hoặc 5 hay không, thông báo ra màn hình.
Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có chia hết cho 3 hoặc 5 hay không, thông báo ra màn hình.
uses crt;
var a:integer;
begin
clrscr;
readln(a);
if (a mod 3=0) or (a mod 5=0) then write('co')
else writeln('khong');
readln;
end.
uses crt;
var a:integer;
begin
clrscr;
write('Nhap a='); readln(a);
if (a mod 3=0) and (a mod 5=0) then writeln(a,' dong thoi chia het cho 3 va 5')
else writeln('Khong thoa dieu kien');
readln;
end.
Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có đồng thời chia hết cho 3 và 5 hay không, thông báo ra màn hình.