Tìm giá trị nhỏ nhất của một dãy số nguyên A={ a1,a1......,aN}
cho dãy số nguyên a1,a2... an. Tìm giá trị lớn nhất ( giá trị nhỏ nhất ) trong dãy số nguyên
Thực sự mình ko biết làm. mn giúp mình với!!
uses crt;
var a:array[1..100]of integer;
i,n,ln,nn:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
ln:=a[1];
nn:=a[1];
for i:=1 to n do
begin
if ln<a[i] then ln:=a[i];
if nn>a[i] then nn:=a[i];
end;
writeln(ln);
writeln(nn);
readln;
end.
Bài 1: Cho n và dãy số nguyên a1, a2, …, an. Tính và in ra màn hình tổng các số trong dãy a.
Bài 2. Cho n và dãy số nguyên a1, a2, …, an. In ra màn hình giá trị nhỏ nhất trong dãy a.
1:
#include <bits/stdc++.h>
using namespace std;
long long n,i,x,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
t=t+x;
}
cout<<t;
return 0;
}
Input: dãy số nguyên gồm n số được nhập từ bạn phím
Output: số lớn nhất, bé nhất trong dãy
B1: nhập dãy số nguyên
B2: gán max:=a[1]; min:=a[1]
B3: nếu max<a[i] thì max:=a[i]; min>a[i] then min:=a[i]
B4: in kết quả ra màn hình
uses crt;
var a:array[1..250]of integer;
n,i,t,max,min:integer;
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 3=0 then t:=t+a[i];
writeln('Tong cac so la boi cua 3 la: ',t);
max:=a[1];
min:=a[1];
for i:=1 to n do
begin
if max<a[i] then max:=a[i];
if min>a[i] then min:=a[i];
end;
writeln('Gia tri lon nhat la: ',max);
writeln('Gia tri nho nhat la: ',min);
readln;
end.
Cho dãy số nguyên A : A1,A2,A3,....,An . Tìm vị trí của một số nguyên có giá trị bằng ktrong dãy A, k có giá trị nguyên cho trước (k khác 0)
#include <bits/stdc++.h>
using namespace std;
long long k,x,i,n,vt;
int main()
{
cin>>n;
cin>>k;
vt=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x==k) vt=i;
}
if (vt==0) cout<<"Khong co "<<k<<" trong day";
else cout<<vt;
return 0;
}
Bài 1: Giá trị lớn nhất. Cho dãy số nguyên A=(a1, a2, …..,an), hãy cho biết giá trị lớn nhất của dãy con liên tiếp. Dữ liệu vào: Cho trong tệp tin văn bản SMAX.INP gồm
Dòng 1: Chứa số nguyên dương N≤107
Dòng 2: chứa n số nguyên a1, a2, …,an cách nhau ít nhất một dấu cách (Với mọi i: |ai |≤109 )
Kết quả ra: Ghi ra tệp tin văn bản SMAX.OUT là giá trị lớn nhất của dãy con liên tiếp của dãy A
Viết chương trình nhập vào N, dãy số nguyên A1, A2…An(N<=100). Tìm giá trị lớn nhất và vị trí của nó trong dãy.
n = int(input("Nhap so phan tu cua day: "))
a = [ ]
for i in range(n):
a.append(int(input("Nhap phan tu thu " + str(i+1) + ": ")))
max_value = a[0]
max_index = 0
for i in range(1, n):
if a[i] > max_value:
max_value = a[i]
max_index = i
print("Gia tri lon nhat trong day la:", max_value, "tai vi tri", max_index+1)
B1:1 số tự nhiên A thỏa mãn A chia 25 dư \13 và A chia 4 dư 2 . Tìm 2 chữ số tận cùng của a
B2:cho n số nguyên lẻ a1,a2,...an (n>2007) thỏa mãn a1^2+...+a2005^2=a2006^2+...+an^2 tìm giá trị nhỏ nhất của n và chỉ ra 1 bộ sô a1,a1,...an thỏa mãn tìm được
Giúp em vs
Bài 1:Viết chương trình nhập vào một dãy số thực gồm N số (N được nhập từ bàn phím và N <=100). Tính tổng tất cả các phần tử và tính giá trị trung bình của các phần tử đó.
Bài 2:Tìm phần tử nhỏ nhất của một dãy số nguyên dương A1, A2,...,AN với N được nhập từ
bàn phím và N<=100.
Bai 2:
uses crt;
var a:array[1..100]of integer;
i,n,t,nn:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
nn:=a[1];
for i:=1 to n do
if nn>a[i] then nn:=a[i];
write(nn);
readln;
end.