Viết chương trình thực hiện các công việc: Nhập từ bàn phím số nguyên dương N (5

Viết một chương trình thực hiện các công việc sau:- Nhập từ bàn phím 1 dãy A gồm N số nguyên (với N được nhập từ bàn phím).- Sắp xếp dãy số đó theo chiều giảm dần. - In ra mà hình tất cả các phần tử chẵn- Tìm và đưa ra chỉ số của phần tử có gía trị = K (với K là số nguyên và được nhập từ bàn...

#Tin học lớp 10

0

HD

Huyền Diệu Nguyễn

23 tháng 12 2021

1

NL

Nguyễn Lê Phước Thịnh

24 tháng 12 2021

#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;

}

HA

Hùng Anh Nguyễn Đăng

11 tháng 1 2022

Viết chương trình thực hiện việc nhập từ bàn phím hai số nguyên dương A và B (A<B), tính và đưa ra màn hình tổng các số chia hết cho 3 hoặc 5 trong phạm vi từ A đến B.

1

NL

Nguyễn Lê Phước Thịnh

11 tháng 1 2022

#include <bits/stdc++.h>

using namespace std;

long long a,b,t,i;

int main()

{

cin>>a>>b;

t=0;

for (i=a; i<=b; i++)

if ((i%3==0) or (i%5==0)) t=t+i;

cout<<t;

return 0;

}

NH

Nguyễn Huỳnh Mai Trân

14 tháng 4 2022

Viết chương trình pascal thực hiện các công việc sau :

A) nhập 1 mảng số nguyên gồm N phần tử .

B) In ra màng hình các phần tử khác X và tính tổng các phần tử khác X

( với N và X là 2 số nguyên nhập từ bàn phím )

1

NL

Nguyễn Lê Phước Thịnh

14 tháng 4 2022

#include <bits/stdc++.h>

using namespace std;

long long n,i,x,a[1000],t;

int main()

{

cin>>n;

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

cin>>x;

t=0;

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

if (a[i]!=x)

{

cout<<a[i]<<" ";

t+=a[i];

}

cout<<endl;

cout<<t;

return 0;

}

1. Thực hànhBài 1: Viết chương trình nhập số nguyên n từ bàn phím. Kiểm tra và in ra màn hình số n có hợp lệ hay không với điều kiện n là số nguyên dương chẵn.Bài 2: Viết chương trình Pascal nhập các số nguyên x và y từ bàn phím, in giá trị của x và y ra màn hình. Sau đó hoán đổi các giá trị của x và y rồi in lại ra màn hình giá trị của x và y.• Ví dụ cho x:=5; y:=7.Hoán đổi để x:=7; y:=5.Cho 1 biến trung gian là...

K

KenShi

17 tháng 12 2021

1

NL

Nguyễn Lê Phước Thịnh

18 tháng 12 2021

Bài 2:

#include <bits/stdc++.h>

using namespace std;

long long x,y;

int main()

{

cin >>x>>y;

cout<<x<<" "<<y;

swap(x,y);

cout<<x<<" "<<y;

return 0;

}

Viết chương trình nhập vào 1 mảng 1 chiều gồm n phần tử (với n được nhập vào từ bàn phím). Hãy thực hiện các công việc sau:- Nhập các phần tử mảng từ bàn phím.- Hiển thị mảng vừa nhập ra màn hình.- In ra màn hình các số chính phương trong mảng.- Đếm trong mảng có bao nhiêu phần tử có giá trị bằng 5. Nếu không có phần tử nào có giá trị bằng 5 thì in ra màn hình thông báo “Không có phần tử nào thỏa mãn điều...

HH

Huy Hoàng Phạm

20 tháng 12 2021

1

NL

Nguyễn Lê Phước Thịnh

20 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long n,i,a[10000];

int main()

{

cin>>n;

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

cin>>a[i];

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

return 0;

}

bài 1:Viết chương trình nhập vào một mảng số nguyên gồm n phần tử(n<100) nhập từ bàn phím thực hiện các công việc sau: a)In ra màn hình các phần tử của mảng vừa nhập.b) Sắp xếp dãy số nguyên theo thứ tự tăng dần.c) Nhập số nguyên x bất kì.Tính số chắn lớn nhất không được vượt quá...

BP

bui pham phuong Uyen

27 tháng 1 2021

1

NL

Nguyễn Lê Phước Thịnh

27 tháng 1 2021

Bài 1:

uses crt;

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

i,n,kt,max,x,j,tam:integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

writeln('Mang ban vua nhap la: ');

for i:=1 to n do

write(a[i]:4);

writeln;

for i:=1 to n-1 do

for j:=i+1 to n do

if a[i]>a[j] then

begin

tam:=a[i];

a[i]:=a[j];

a[j]:=tam;

end;

writeln('Day tang dan la: ');

for i:=1 to n do

write(a[i]:4);

writeln;

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

max:=0;

kt:=0;

for i:=1 to n do

if (a[i] mod 2=0) and (a[i]<=x) then

begin

if max<a[i] then max:=a[i];

kt:=1;

end;

if kt=0 then writeln('Trong day khong co so le')

else writeln('So chan lon nhat khong vuot qua ',x,' la: ',max);

readln;

end.

H

haductrung

18 tháng 3 2022

Viết chương trình Pascal, đặt tên chương trình là tên của con sau đó tải file ảnh lên đây. Chương trình thực hiện công việc sau: Khai báo 1 mảng A chứa tối đa 50 số nguyên, nhập n từ bàn phím, nhập vào mảng A gồm n số, viết mảng A ra màn hình (tất cả các phần tử trên cùng 1 dòng?

1

NL

Nguyễn Lê Phước Thịnh

18 tháng 3 2022

uses crt;

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

i,n:integer;

begin

clrscr;

readln(n);

for i:=1 to n do

readln(a[i]);

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

readln;

end.

TN

Tích Nguyệt

18 tháng 3 2022

Viết chương trình Pascal, đặt tên chương trình là tên của con sau đó tải file ảnh lên đây. Chương trình thực hiện công việc sau: Khai báo 1 mảng A chứa tối đa 50 số nguyên, nhập n từ bàn phím, nhập vào mảng A gồm n số, viết mảng A ra màn hình (tất cả các phần tử trên cùng 1 dòng?

1

NL

Nguyễn Lê Phước Thịnh

18 tháng 3 2022

uses crt;

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

i,n:integer;

begin

clrscr;

readln(n);

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

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

readln;

end.

[PYTHON]Hai số tự nhiên m,n được gọi là nguyên tố cùng nhau nếu UCLN(m,n)=1.Viết chương trình thực hiện công việc sau: Nhập từ bàn phím số tự nhiên n và đếm số các số nguyên tố cùng nhau với n tính trong khoảng từ 1 đến...

TT

Tài Tuệ Lê

26 tháng 4 2023

#Tin học lớp 10

1

NB

Ngô Bá Hùng

26 tháng 4 2023

def is_coprime(a, b):
"""Hàm ktra a và b có phải là nguyên tố cùng nhau"""
while b:
a, b = b, a % b
return a == 1

n = int(input("Nhập stn n: "))
count = 0

for i in range(1, n+1):
if is_coprime(i, n):
count += 1

print(f"Số lượng số nguyên tố cùng nhau với n là {count}.")

Đúng(2)

4H

42. Hồ Đăng Quốc Trung. 7/1

23 tháng 4 2023

viết chương trình thực hiện công việc nhập N (N<=50) phần tử có giá trị nguyên cho mảng A từ bàn phím. In ra màn hình tổng các giá trij là số lẻ có trong mảng Ahelpppppppp, ai giải được cho 400 chịu

1

PS

Phía sau một cô gái

23 tháng 4 2023

program TongLe;

var

N, i, Tong: integer;

A: array[1..50] of integer;

begin

write('Nhap so phan tu cua mang N (N <= 50): ');

readln(N);

for i := 1 to N do

begin

write('Nhap phan tu thu ', i, ': ');

readln(A[i]);

end;

Tong := 0;

for i := 1 to N do

begin

if(A[i] mod 2 <> 0) then

begin

Tong := Tong + A[i];

end;

writeln('Tong cac so le trong mang A la: ', Tong);

readln;

end.

4H

42. Hồ Đăng Quốc Trung. 7/1

23 tháng 4 2023

Cho bạn 400 chịu cái nịt nhoá❤️🙈