Cho 1 dãy số nguyên a1,a2,…,an
Yêu cầu: Hãy tìm số âm lớn nhất trong dãy trên
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
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
Bài 1:
uses crt;
var a:array[1..1000000]of longint;
i,n,x:longint;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap x='); readln(x);
for i:=1 to n do
if a[i]<>x then write(a[i]:4);
readln;
end.
Bài 1.
Bước 1. Nhập N và dãy số a1,a2,...,aNa1,a2,...,aN
Bước 2. i←1i←1, S←0S←0
Bước 3. i←i+1i←i+1
Bước 4. 4.1 Nếu i>Ni>N thì kết thúc thuật toán và đưa ra kết quả.
4.2 ai≥0ai≥0 thì quay lại bước 3
4.3 S←S+aiS←S+ai rồi quay lại bước 3
Câu 4:
#include <bits/stdc++.h>
using namespace std;
int main()
{
int a[100],n,i,t;
cin>>n;
for (i=1; i<=n; i++)
cin>>a[i];
t=0;
for (i=1; i<=n; i++)
if (a[i]<0) t=t+a[i];
cout<<t;
return 0;
}
Câu 4:
#include <bits/stdc++.h>
using namespace std;
int main()
{
int a[100],n,i,t;
cin>>n;
for (i=1; i<=n; i++)
cin>>a[i];
t=0;
for (i=1; i<=n; i++)
if (a[i]<0) t=t+a[i];
cout<<t;
return 0;
}
Câu 4:
#include <bits/stdc++.h>
using namespace std;
int main()
{
int a[100],n,i,t;
cin>>n;
for (i=1; i<=n; i++)
cin>>a[i];
t=0;
for (i=1; i<=n; i++)
if (a[i]<0) t=t+a[i];
cout<<t;
return 0;
}
Câu 4:
#include <bits/stdc++.h>
using namespace std;
int main()
{
int a[100],n,i,t;
cin>>n;
for (i=1; i<=n; i++)
cin>>a[i];
t=0;
for (i=1; i<=n; i++)
if (a[i]<0) t=t+a[i];
cout<<t;
return 0;
}
Câu 4:
#include <bits/stdc++.h>
using namespace std;
int main()
{
int a[100],n,i,t;
cin>>n;
for (i=1; i<=n; i++)
cin>>a[i];
t=0;
for (i=1; i<=n; i++)
if (a[i]<0) t=t+a[i];
cout<<t;
return 0;
}
#include <bits/stdc++.h>
using namespace std;
long long a[1000],n,i;
int main()
{
freopen("dayd.inp","r",stdin);
freopen("dayd.out","w",stdout);
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++)
if (a[i]>0) cout<<a[i]<<" ";
return 0;
}
Var maxam,i,n,cs : Integer;
A:array[1..100] of integer;
Begin
Write (' nhap n : ');
Readln(n);
For i:= 1 to n do Begin
Write ('A[',i,']=');
Readln(A[i]);
end;
For i:= 1 to n do If A[i]<0 then maxam:=A[i];
Maxam:=A[1]; cs:=1;
For i:= 2 to n do begin
If (A[i]<0) and ( maxam<A[i]) then
begin
Maxam:=A[i];
cs:=i;
end;
end;
Writeln (' pt am lon nhat trong mang : ',Maxam);
Writeln(' vi tri cua ptu do la :',cs);
Readln;
end.