Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
21 tháng 6 2018 lúc 16:35

Chi Phạm Ngọc Diệp
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:07

if (b%2==0) cout<<"b la so chan";

if (b%2==1) cout<<"b la so le";

Chi Phạm Ngọc Diệp
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:08

if (b%2==0) cout<<"b la so chan";

if (b%2==1) cout<<"b la so le";

Chi Phạm Ngọc Diệp
Xem chi tiết
Nguyễn Lê Phước Thịnh
17 tháng 12 2021 lúc 14:40

if (b%2==0) cout<<"b la so chan";

else cout<<"b la so le";

32. Lê Thị Phương Thi
Xem chi tiết
Kiều Vũ Linh
19 tháng 1 2022 lúc 9:46

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.

Minh Lệ
20 tháng 1 2022 lúc 23:57

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.

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
24 tháng 2 2017 lúc 13:19

Triển Hoàng Đình
Xem chi tiết
Nguyễn Lê Phước Thịnh
5 tháng 8 2021 lúc 23:34

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.

hoàng tuấn anh
Xem chi tiết
Nguyễn Lê Phước Thịnh
25 tháng 12 2020 lúc 13:10

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.

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
27 tháng 11 2018 lúc 11:15