Câu 1: Viết chương trình sử dụng biến mangrcho dãy số nguyên
-Tìm giá trị nhỏ nhất ( Lớn nhất )
-Tìm tổng các giá trị của dãy
-Tìm tổng của các số nguyên dương ( nguyên âm )
-Tìm tổng các số lẻ (Tống chẵn )
-Tìm tổng các số là bội của 5
-Viết n số nguyên sắp xếp theo thứ tự tăng dần
Câu 1: Viết chương trình sử dụng biến mangrcho dãy số nguyên
-Tìm giá trị nhỏ nhất ( Lớn nhất )
-Tìm tổng các giá trị của dãy
-Tìm tổng của các số nguyên dương ( nguyên âm )
-Tìm tổng các số lẻ (Tống chẵn )
-Tìm tổng các số là bội của 5
-Viết n số nguyên sắp xếp theo thứ tự tăng dần
Cho số nguyên dương n(n nhỏ hơn hoặc bằng 250) và dãy A gồm n số nguyên dương A1, A2,...An. mỗi số đều không vượt quá 500 .
a/Tính tổng các số là bội của 3
b/tìm giá trị lớn nhất nhỏ nhất của mảng
Xem chi tiết
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.
Đúng 2
Bình luận (0)
Tìm giá trị nhỏ nhất của 1 dãy số nguyên N bằng 15 , dãy a : 7,4,19,3,6
#include <bits/stdc++.h>
using namespace std;
long long n,x,ln,i;
int main()
{
cin>>n;
cin>>x;
ln=x;
for (i=1; i<x;i++)
{
cin>>x;
if (ln<=x) ln=x;
}
cout<<ln;
return 0;
}
Đúng 0
Bình luận (0)
a, tìm giá trị nhỏ nhất trong dãy A gồm N số nguyên b, đưa ra vị trí của số nhỏ nhất trong dãy
a:
#include <bits/stdc++.h>
using namespace std;
long long n,x,i,ln;
int main()
{
cin>>n>>x;
ln=x;
for (i=1; i<n;i++)
{
cin>>x;
ln=max(ln,x);
}
cout<<ln;
return 0;
}
Đúng 0
Bình luận (0)
Tìm số nguyên dương x để A=2010/(x-1) đạt giá trị nhỏ nhất. Tìm giá trị nhỏ nhất đó.
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.
Đúng 0
Bình luận (0)
giúp mình với
Cho một dãy số gồm n phần tử ( n<=50 ) giá trị phần tử là số nguyên. thực hiện chương trình sau .
a) nhập từ bàn phím số phần tử và giá trị các phần tử
b) tính tổng các phần tử số dương của dãy
c) tìm số lớn nhất nhỏ nhất
d) in ra màng hình kết quả
uses crt;
var a:array[1..100]of integer;
i,n,t,ln,nn:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t:=0;
for i:=1 to n do
if a[i]>0 then t:=t+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(t);
writeln(ln);
writeln(nn);
readln;
end.
Đúng 3
Bình luận (1)
Chương trình nhập vào một dãy số nguyên sau đó tìm đồng thời giá trị nhỏ nhất của dãy số
uses crt;
var a:array[1..100]of integer;
i,n,min:integer;
begin
clrscr;
write('Nhap 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 0
Bình luận (0)