viết các số chẵn từ 100 đến 1682 hết ? lượt
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Những câu hỏi liên quan
23 tháng 12 2021
Bài 2:
uses crt;
var x,i,n,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
for i:=1 to n do
begin
readln(x);
if x mod 2=0 then inc(dem);
end;
writeln(dem);
readln;
end.
TK
0
20 tháng 3 2021
a)
uses crt;
var i,n:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n<100;
if n mod 2=0 then
begin
for i:=0 to n do
if i mod 2=0 then write(i:4);
end
else writeln(n,' khong la so chan');
readln;
end.
20 tháng 3 2021
b)
uses crt;
var i,n:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n<100;
if n mod 2=1 then
begin
for i:=1 to n do
if i mod 2=1 then write(i:4);
end
else writeln(n,' khong la so le');
readln;
end.
NN
2
22 tháng 10 2021
Vì nó có tận cùng là chữ số chẵn như: 0,2,4,6,8... thì đều chia hết cho 2
MT
1
3 tháng 1 2022
- Bài này mình viết ở ngôn ngữ C++
- Chương trình :
#include<iostream>
using namespace std;
int main() {
int g = 0;
for (int i = 100; i <= 1000; i++) {
if (i % 2 == 0) {
g += i;
}
}
cout << g;
return 0;
}
HN
1
3 tháng 1 2022
#include <bits/stdc++.h>
using namespace std;
long long i,t;
int main()
{
t=0;
for (i=100; i<=200; i++)
if (i%2==0) t=t+i;
cout<<t;
return 0;
}
22 tháng 4 2021
uses crt;
var i,n,t:integer;
begin
clrscr;
write('nhap n='); readln(n);
t:=0;
for i:=1 to n do
if i mod 2=0 then t:=t+i;
writeln(t);
readln;
end.
hết 1582 lượt
hết 1582 lượt
bạn cứ lấy
1682 - 100 = 1582