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
Hiếu
Xem chi tiết
Nguyễn Phạm Như Quỳnh
Xem chi tiết
huỳnh duy cát
Xem chi tiết
Nguyễn Lê Phước Thịnh
20 tháng 3 2021 lúc 19:53

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.

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

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.

ngô phương anh
Xem chi tiết
ngô phương anh
26 tháng 6 2023 lúc 22:22

chịu

 

Trên con đường thành côn...
27 tháng 6 2023 lúc 9:36

Python:

n=int(input("Nhap so nguyen duong n:"))

dem=0

for i in range(1,n+1):

 if i%4==0:

  dem=dem+1

print(dem)

Nguyễn Hoàng Duy
27 tháng 6 2023 lúc 9:54

n = int(input("Nhập n: "))
count = 0
for i in range(1, n + 1):
    if i % 4 == 0:
        count += 1
print(f"Số lượng số chia hết cho 4 từ 1 đến {n} là {count}.")

 

Trang
Xem chi tiết
Minh Lệ
9 tháng 5 2023 lúc 13:37

Program HOC24;

var i,n,d: integer;

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

begin

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

for i:=1 to n do

begin

write('Nhap so thu ',i,': '); readln(a[i]);

end;

d:=0;

for i:=1 to n do if a[i] mod 5<>0 then d:=d+1;

write('Co ',d,' so khong chia het cho 5');

readln

end.

Đỗ Thiên
Xem chi tiết
Nguyễn Lê Phước Thịnh
21 tháng 10 2021 lúc 23:45

#include <bits/stdc++.h>

using namespace std;

int i,n;

int main()

{

cin>>n;

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

cout<<"* ";

return 0;

}

Selena Flynn
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 3 2022 lúc 23:03

c1: 

#include <bits/stdc++.h>

using namespace std;

long long i,n,s;

int main()

{

cin>>n;

s=1;

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

cout<<s;

return 0;

}

Câu 2: 

#include <bits/stdc++.h>

using namespace std;

long long i,n,s;

int main()

{

cin>>n;

s=1;

for (i=1; i<=n; i++) if (i%2==0) s=s*i;

cout<<s;

return 0;

}

Dư Dư
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 3 2022 lúc 7:19

uses crt;

const fi='kq.txt'

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

i,n:integer;

f1:text;

begin

clrscr;

n:=10;

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

assign(f1,fi); rewrite(f1);

for i:=1 to n do 

  begin

if (n%5<>0) then write(f1,a[i]:4);

else writeln(f1);

end;

close(f1);

readln;

end.

Tiến
Xem chi tiết
Nguyễn Lê Phước Thịnh
17 tháng 3 2021 lúc 20:03

uses crt;

var i,n,dem:integer;

begin

clrscr;

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

dem:=0;

for i:=1 to n do 

  if i mod 2=0 then 

begin

inc(dem);

write(i:4);

if dem=15 then writeln;

end;

readln;

end.

Bùi Anh Tuấn
17 tháng 3 2021 lúc 20:08