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

#include <bits/stdc++.h>

using namespace std;

long long a[4],n,x;

int main()

{

cin>>n>>x;

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

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

if (a[i]==x)

{

cout<<"YES";

break;

}

cout<<"NO";

return 0;

}

HELP

 cứu ae ơi

Input:

VD1: ba số a,b,c

VD2: số nguyên dương N

VD3: 3 số a,b,c

VD4: dãy số nguyên

VD5: số nguyên N và dãy a1,a2,...,aN

Output:

VD1: Nghiệm x của phương trình ax²+bx+c=0

VD2: N là số nguyên tố, N không phải số nguyên tố

VD3: Số lớn nhất trong 3 số

VD4: Giá trị lớn nhất của dãy

VD5: Dãy số tăng dần

a: 

#include <bits/stdc++.h>

using namespace std;

long long n,x,i,t;

int main()

{

cin>>n;

t=0;

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

{

cin>>x;

t=t+x;

}

cout<<t;

return 0;

}

Bài 2: 

#include <bits/stdc++.h>

using namespace std;

long long a;

int main()

{

cin>>a;

if (a%2==0) cout<<"la so chan";

else cout<<"La so le";

return 0;

}

c: include <bits/stdc++.h>

using namespace std;

long long a,b,c;

int main()

{

cin>>a>>b>>c;

cout<<max(a,max(b,c));

return 0;

}

#include <bits/stdc++.h>

using namespace std;

double x,t;

int n,i;

int main()

{

cin>>n;

t=0;

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

{

cin>>x;

t=t+x;

}

cout<<"tong cac so la:"<<fixed<<setprecision(2)<<t<<endl;

cout<<"trung binh la:"<<fixed<<setprecision(2)<<t/(n*1.0);

return 0;

}

uses crt;

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

max,n,i:integer;

begin

writeln('nhap do dai cua day');readln(n);

for i:=1 to n do begin writeln('A[',i,']=;);readln(a[i]); end;

max:=a[1];

for i:=2 to n do if a[i] > max then begin

max:=a[i]; writeln('vi tri cua max trong day la',i);end;

 readln

end.

thật ra thì cũng không cần biến max nhưng mình làm vậy cho dễ hiểu hơn nhé!

*Thuật toán:

-Bước 1: Nhập n và nhập dãy số

-Bước 2: max←a[1]; i←1;

-Bước 3: i←i+1;

-Bước 4: Nếu max<a[i] thì max←a[i];

-Bước 5: Nếu i<=n thì quay lại bước 3

-Bước 6: Cho for chạy từ 1 đến n

Nếu a[i]=max thì xuất i

-Bước 7: Kết thúc

uses crt;

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

i,n,nn,s:integer;

begin

clrscr;

readln(n);

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

nn:=a[1];

s:=1;

for i:=1 to n do 

begin

if nn>a[i] then nn:=a[i];

s:=s*a[i];

end;

writeln(nn);

writeln(s);

readln;

end.