Những câu hỏi liên quan
Tuấn Kiệt Phạm
Xem chi tiết
Phúc Trần
Xem chi tiết
Phúc Trần
12 tháng 4 2022 lúc 19:27

Mình cần gấp lắm ạ, ai giúp mình với T-T

 

Bình luận (0)
Nguyễn Lê Phước Thịnh
13 tháng 4 2022 lúc 18:32

2:

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++) if (a[i]%2==0) cout<<a[i]<<" ";

return 0;

}

Bình luận (0)
Phát Trương Tấn
Xem chi tiết
Minh Lệ
23 tháng 3 2023 lúc 12:17

Program HOC24;

var i,n: integer;

begin

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

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

readln

end.

Bình luận (0)
Nguyễn minh quân
Xem chi tiết
Nguyễn Lê Phước Thịnh
20 tháng 2 2021 lúc 18:11

uses crt;

var a:array[1..100]of integer;

i,n:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to n do 

  if a[i] mod 2<>0 then write(a[i]:4);

readln;

end.

Bình luận (0)
Lưu Quang Trường
20 tháng 2 2021 lúc 16:19

uses crt;

var i,n: integer;

       a: array[1..10000] of integer;

begin

writeln('nhap so nguyen n: '); readln(n);

for i:=1 to n do

begin

writeln('A[',i,']'); readln(a[i]);

if i mod 2 <>0 then writeln(i);

end;

readln;

end.

Bình luận (5)
NGUYỄN LÊ XUÂN THỊNH
Xem chi tiết
Nguyễn Lê Phước Thịnh
20 tháng 2 2023 lúc 0:38

Câu 6:

uses crt;

var n,i:integer;

begin

clrscr;

readln(n);

for i:=1 to n do 

if n mod i=0 then write(i:4);

readln;

end.

5:

uses crt;

var n,i,dem:integer;

begin

clrscr;

readln(n);

dem:=0;

for i:=0 to n do

if i mod 2=1 then 

begin

write(i:4);

dem:=dem+1;

end;

writeln;

writeln(dem);

readln;

end.

Bình luận (0)
nuinuini
Xem chi tiết
Lê Quang Hiếu
Xem chi tiết
Nguyễn Mai Bảo
25 tháng 2 2022 lúc 7:11

tick cho e dc ko

Bình luận (0)
huu nguyen
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 3 2022 lúc 9:00

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do 

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

writeln(t);

readln;

end.

Bình luận (0)
Thúy Hoa
Xem chi tiết
Bùi Anh Tuấn
30 tháng 3 2021 lúc 20:01

Bình luận (0)
Nguyễn Lê Phước Thịnh
30 tháng 3 2021 lúc 20:31

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.

Bình luận (0)