Những câu hỏi liên quan
NH
Xem chi tiết
DT
21 tháng 6 2018 lúc 16:35

Bình luận (0)
CD
Xem chi tiết
NT
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";

Bình luận (0)
CD
Xem chi tiết
NT
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";

Bình luận (0)
CD
Xem chi tiết
NT
17 tháng 12 2021 lúc 14:40

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

else cout<<"b la so le";

Bình luận (0)
3T
Xem chi tiết
KL
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.

Bình luận (0)
ML
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.

Bình luận (0)
NH
Xem chi tiết
DT
24 tháng 2 2017 lúc 13:19

Bình luận (0)
TD
Xem chi tiết
NT
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.

Bình luận (0)
HA
Xem chi tiết
NT
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.

Bình luận (0)
NH
Xem chi tiết
DT
27 tháng 11 2018 lúc 11:15

Bình luận (0)