Những câu hỏi liên quan
QH
Xem chi tiết
CT
7 tháng 11 2017 lúc 22:11

https://olm.vn/hoi-dap/question/746532.html

Bình luận (0)
H24
Xem chi tiết
UT
18 tháng 3 2022 lúc 21:05

Tham khảo
Bài 2.
Var i:integer;
begin
for i:=1 to 100 do
if i mod 2=0 then write(' Cac so chan tu 1 den 100 la: ',i,' ');
readln;
end.

Bình luận (4)
NA
Xem chi tiết
PG
9 tháng 3 2023 lúc 22:39

program dem_so_chia_het_cho_5;

uses crt;

var

     N, count, i: integer;

begin

     clrscr;

     write('Nhap so nguyen N: ');

     readln(N);

     count := 0;

     for i := 1 to N do

     begin

          if (i mod 5 = 0) then

          begin

               count := count + 1;

          end;

     end;

     writeln('Co ', count, ' so nguyen chia het cho 5 tu 1 den ', N);

     readln;

end.

Bình luận (0)
VP
Xem chi tiết
NC
27 tháng 11 2021 lúc 18:41
? Bao nhiêu vậy
Bình luận (0)
 Khách vãng lai đã xóa
NA
Xem chi tiết
TC
16 tháng 3 2022 lúc 13:34

tham khảo

 

program tinhoc;

uses crt;

var n,dem,tich:integer;

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

begin

clrscr;

writeln('Nhap so phan tu cua day: ');readln(n);

writeln('Nhap ',n,' phan tu cua day: ');

for i:= 1 to n do readln(a[i]);

dem:=0; tich:=1;

for i:= 1 to n do if a[i] mod 2 = 0 then begin dem:=dem+1; tich:=tich*a[i] end;

writeln('Co ',dem,' phan tu chan trong day');

writeln('Tich cua cac so chan trong day la: ',tich);

readln

end.

Bình luận (0)
NT
16 tháng 3 2022 lúc 13:59

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,dem;

int main()

{

cin>>n;

dem=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x>0) dem++;

}

cout<<dem;

return 0;

}

Bình luận (0)
NN
Xem chi tiết
SS
Xem chi tiết
NH
20 tháng 3 2022 lúc 7:21

Câu 1: 
uses crt;
var s,i,n:integer;
begin clrscr;
s:=0;
write('Nhap n: ');readln(n);
for i:=1 to n do
if i mod 2 <> 0 then inc(s,i);
write('Tong cac so le tu 1 den ',n,' la: ',s);
readln
end.

Bình luận (0)
NH
20 tháng 3 2022 lúc 7:22

Câu 2:
uses crt;
var s,i,n:integer;
begin clrscr;
s:=0;
write('Nhap n: ');readln(n);
for i:=1 to n do
if i mod 2 = 0 then inc(s,i);
write('Tong cac so le tu 1 den ',n,' la: ',s);
readln
end.

Bình luận (0)
HN
Xem chi tiết
NT
24 tháng 12 2021 lúc 0:49

#include <bits/stdc++.h>

using namespace std;

long long n,i,a[1000];

int main()

{

cin>>n;

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

sort(a+1,a+n+1);

for (i=n; i>=1; i--) cout<<a[i]<<" ";

return 0;

}

Bình luận (0)
LD
Xem chi tiết
NT
4 tháng 4 2022 lúc 21:56

#include <bits/stdc++.h>

using namespace std;

long long x,i,n=4,dem;

int main()

{

dem=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x%2==0) dem++;

}

cout<<dem;

return 0;

}

Bình luận (0)