Bài 3. Viết chương trình nhập từ bàn phím dãy số thực có N phần tử (1<N<100). hãy in ra màn hình
a. dãy số ban đầu đã nhập
b. dãy số đã sắp xếp lại. biết sắp xếp các phần tử theo nguyên tắc sau: a1 đổi chỗ cho an, a2 đổi chỗ cho an-1,...
Giúp mik với ạ!!! Mik cần gấp!!!Mik xin cảm ơn trước ạ!!!
Những câu hỏi liên quan
Bài 1: viết chương trình nhập dãy số nguyên A gồm N phần tử. Với N được nhập từ bàn phím. Tìm và in kết quả ra màn hình phân tử nhỏ nhất của dãy số.
Bài 2:viết chương trình nhập dãy số nguyên A gồm N phần tử. Với N được nhập từ bàn phím. Tìm và in kết quả ra màn hình phân tử lớn nhất của dãy số
Bài 1:
uses crt;
var a:array[1..100]of integer;
i,n,min:integer;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
min:=a[1];
for i:=1 to n do
if min>a[i] then min:=a[i];
writeln(min);
readln;
end.
Đúng 2
Bình luận (1)
Bài 2:
uses crt;
var a:array[1..100]of integer;
i,n,max:integer;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:=1 to n do
if max<a[i] then max:=a[i];
writeln(max);
readln;
end.
Đúng 1
Bình luận (0)
Viết chương trình pacsal để nhập từ bàn phím các phần tử của 1 dãy số . Độ dài N của dãy số nhập từ bàn phím ( 2 < n
Var a:array[1..200] of real;
i,n:integer;
Begin
n:=0;
While n < 2 do
Begin
Write('Nhap n = ');readln(n);
End;
For i:=1 to n do
Begin
Write('Nhap phan tu thu ',i,' = ');readln(a[i]);
End;
Readln;
End.
Đúng 0
Bình luận (0)
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 phím).
#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;
}
Đúng 0
Bình luận (0)
Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của dãy N số thực
C1 Viết Chương trình nhập vào một mảng số thực gồm n phần tử tính tổng các phần tử chẵn ( n được nhập tử bàn phím )
C2 Viết chương trình nhập vào một mảng số nguyên gồm n phần tử tính tích các phần tử có trong dãy số đó
Câu 1:
uses crt;
var a:array[1..100]of real;
i,n:integer;
t:real;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
if a[i] mod 2=0 then t:=t+a[i];
writeln(t:4:2);
readln;
end.
Đúng 0
Bình luận (0)
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n:integer;
t:real;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=1;
for i:=1 to n do
t:=t*a[i];
writeln(t:4:2);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập vào dãy số có n phần tử với n được nhập từ bàn phím .in ra phần tử vừa nhập ra màn hình
program NhapDaySo;
uses crt;
const
MAX = 100;
var
n, i: integer;
a: array[1..MAX] of real;
begin
clrscr;
write('Nhap so phan tu: ');
readln(n);
for i := 1 to n do
begin
write('Nhap phan tu thu ', i, ': ');
readln(a[i]);
end;
writeln('Day so da nhap la: ');
for i := 1 to n do
begin
writeln('Phan tu thu ', i, ': ', a[i]:0:2);
end;
readln;
end.
Đúng 1
Bình luận (0)
Viết chương trình nhập dãy số A có n phần tử từ bàn phím, tính tổng các phần tử trong A
Program HOC24;
var i,n: integer;
t: longint;
a: array[1..1000] of integer;
begin
write('Nhap n '); readln(n);
for i:=1 to n do
begin
write('a[',i,']= '); readln(a[i]);
end;
t:=0;
for i:=1 to n do t:=t+a[i];
write('Ket qua la: ',t);
readln
end.
Đúng 1
Bình luận (0)
Bài 1: Nhập từ bàn phím một dãy số nguyên ko âm. Hãy in ra màn hình chỉ số i nhỏ nhất sao cho tổng các phần tử từ 1 đến i lớn hơn 100.Bài 2: Hãy viết chương trình Pascal để thực hiện các nhiệm vụ sau:_ Nhập vào tù bàn phím 1 dãy số ko quá 30 số nguyên_ Kiểm tra rồi cho biết dãy số vừa nhập có pải là dãy số ko giảm hay ko ? ( VD 1,2,5,5,6,8,9 là dãy số ko giảm ) Anh chị em bạn dì chú bác ông bà bố mẹ cậu mợ bá ơi, giúp với, cần gấp lắm, ngày kìa thi rồi.....
Đọc tiếp
Bài 1: Nhập từ bàn phím một dãy số nguyên ko âm. Hãy in ra màn hình chỉ số i nhỏ nhất sao cho tổng các phần tử từ 1 đến i lớn hơn 100.
Bài 2: Hãy viết chương trình Pascal để thực hiện các nhiệm vụ sau:
_ Nhập vào tù bàn phím 1 dãy số ko quá 30 số nguyên
_ Kiểm tra rồi cho biết dãy số vừa nhập có pải là dãy số ko giảm hay ko ? ( VD 1,2,5,5,6,8,9 là dãy số ko giảm )
Anh chị em bạn dì chú bác ông bà bố mẹ cậu mợ bá ơi, giúp với, cần gấp lắm, ngày kìa thi rồi.....
Bài 2:
uses crt;
var a:array[1..30]of integer;
i,n,kt:integer;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
kt:=0;
for i:=1 to n-1 do
if a[i]>a[i+1] then kt:=1;
if kt=0 then write('Day so khong giam')
else writeln('Day so lon xon');
readln;
end.
Đúng 0
Bình luận (0)
Đề sai, ko phải lm nx, cô bảo ko thì vào đâu🙂
Đúng 0
Bình luận (0)
20 tháng 4 2023 lúc 21:15
viết chương trình nhập 1 dãy số nguyên gồm n phần tử, tính trung bình cộng dãy số vừa nhập (n đc nhập từ bàn phím) trong thony
N=int(input(‘n=’))
A=[0]*n
For I in range(0,n):
A=int(input(a[‘+str(i+1)+’]=’))
S=s+a[i]
S1 =s/n
Print(s1)
Đúng 0
Bình luận (0)