Những câu hỏi liên quan
Phu Vo
Xem chi tiết
Nguyễn Lê Phước Thịnh
15 tháng 10 2021 lúc 0:43

#include <bits/stdc++.h>

using namespace std;

long long n,i,x,max;

int main()

{

cin>>n;

cin>>x;

max=x;

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

{

cin>>x;

if (max<=x) max=x;

}

cout<<max;

return 0;

}

Bình luận (0)
Nguyễn Phương Oanh
Xem chi tiết
Ngọc Anh Phạm
Xem chi tiết
Nguyễn Lê Phước Thịnh
25 tháng 10 2021 lúc 23:29

#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ình luận (0)
Sự tâm
Xem chi tiết
hoàng văn thịnh
Xem chi tiết
Phía sau một cô gái
26 tháng 7 2023 lúc 21:23

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)

Bình luận (0)
Shuu Tsukiyama
Xem chi tiết
Nguyễn Lê Phước Thịnh
20 tháng 4 2022 lúc 16:50

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ình luận (1)
Trân Tăng
Xem chi tiết
Bùi Anh Tuấn
28 tháng 12 2020 lúc 20:11

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

Bình luận (0)
Bùi Anh Tuấn
28 tháng 12 2020 lúc 20:13

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ình luận (0)
Nguyễn Thị Thanh Nhàn
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 3 2021 lúc 13:58

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ình luận (2)
Tat Đạt
Xem chi tiết