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
Đứa nào ngáo bằng tao?
Xem chi tiết
phanthanhshong
Xem chi tiết
duy lê
Xem chi tiết
Minh Lệ
31 tháng 3 2021 lúc 16:53

Program HOC24;

var i,n: integer;

begin

write('Nhap N: '); readln(n);

write('Cac so tu 1 den ',n,' chia het cho 2 la: ');

for i:=1 to n do if i mod 2=0 then write(i,' ');

writeln;

for i:=1 to n do if i mod 2=1 then write(i,' ');

readln

end.

mon monee
Xem chi tiết
Green sea lit named Wang...
19 tháng 9 2021 lúc 17:41

a)  0; 7; 14; 28; 35; 42; 49; 56

b) 5; 10; 15; 20; 25; 30; 35; 40; 45; 50; 55

Khách vãng lai đã xóa

\(a,140:7=20\)

\(49:7=7\)

=>140 và 49 đều chia hết cho 7

=>Để phép tính trên chia hết cho 7 thì x cũng phải chia hết cho 7

*Lưu ý:x chia hết cho 7 và bé hơn hoặc bằng 56

\(b,25:5=5\)

\(70:5=14\)

=>25 và 70 đều chia hết cho 5

=>Để phép tính trên chia hết cho 5 thì x cũng phải chia hết cho 5

*Lưu ý x chia hết cho 5 bé hơn hoặc bằng 56

Khách vãng lai đã xóa
Good look_Good like
Xem chi tiết
Huy Đại Ca
Xem chi tiết
Huy Đại Ca
5 tháng 5 2021 lúc 14:47

Viết chương trình nhập vào số nguyên n và tính tổng các số lẻ (các số lẻ là số không chia hết cho 2) trong khoảng từ 1 đến n ( ví dụ nhập = 10, ta sẽ có tổng sau s=1+3+5+7+9=25)

Nguyễn Lê Phước Thịnh
5 tháng 5 2021 lúc 20:15

uses crt;

var i,n,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

s:=0;

for i:=1 to n do 

 if i mod 2=1 then s:=s+i;

writeln(s);

readln;

end.

nguyen ngoc tuong vy
Xem chi tiết
Nguyễn Văn Hoàng Quân
21 tháng 3 2016 lúc 20:23

Ket qua la 12005 nha ban

Huyền Trang Trang
Xem chi tiết
Nguyễn Lê Phước Thịnh
7 tháng 3 2021 lúc 18:35

uses crt;

var n,i,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

t:=0;

for i:=1 to n do 

  if i mod 3=0 then 

begin

write(i:4);

t:=t+i;

end;

writeln;

writeln('Tong cac so chia het cho 3 la: ',t);

readln;

end.

Bùi Anh Tuấn
7 tháng 3 2021 lúc 21:29

Trần Long
Xem chi tiết
Akai Haruma
6 tháng 1 2023 lúc 19:22

4 không chia hết cho 49. Bạn xem lại đề xem lỗi ở đâu.