Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
do anh tu
Xem chi tiết
Trần Hồ Thùy Trang
11 tháng 2 2016 lúc 21:22

Tui ms học lp 7 ==

Sự tâm
Xem chi tiết
Hello1234
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 10 2021 lúc 15:00

#include <bits/stdc++.h>

using namespace std;

int main()

{

long a[105], i,n,max,vt;

cout<<"n="; cin>>n;

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

{

cout<<"A["<<i<<"]="; cin>>a[i];

}

max=a[1];

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

if (max<a[i]) max=a[i];

vt=1;

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

if (max==a[i]) vt=i;

cout<<max<<endl;

cout<<vt;

return 0;

}

 

26-Do Thanh Trung
Xem chi tiết
Phạm Gia Long
Xem chi tiết
Nguyễn Lê Phước Thịnh
17 tháng 12 2021 lúc 11:49

#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;

}

Nguyễn Xuân Dự
Xem chi tiết
Kiều Vũ Linh
12 tháng 5 2023 lúc 7:59

Bài 1

Var a:array:[1..1000] of integer;

i,n:integer;

s:longint;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

s:=s+a[i];

End;

Write('Cac so vua nhap la: ');

For i:=1 to n do 

Write(a[i]:8);

writeln;

write('Tong cac so la ',s);

Readln

End.

Pham Trong Bach
Xem chi tiết
Cao Minh Tâm
21 tháng 11 2019 lúc 12:34

Đáp án D

Nguyễn Việt Nga
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)

Hứa Tiến Mạnh
Xem chi tiết
Nguyễn Lê Phước Thịnh
13 tháng 12 2020 lúc 22:35
uses crt; var i,n,a,b, uc,bcnn:integer ; c:array[1..100] of integer; {--- CTC tim UCLL hai so} function ucln(a,b:integer):integer; var r:integer; begin r:=a mod b; while r<>0 do begin a:=b; b:=r; r:= a mod b; end; ucln:=b; end; {--- CTC chinh----} begin Write('n= '); readln(n); for i:=1 to n do begin write('c[',i,']='); readln(c[i]); end; for i:= 1 to n do Write(c[i]:3);writeln; uc:=ucln(c[1], c[2]); bcnn:=(c[1]*c[2])div uc; for i:=3 to n do begin uc:=ucln(uc,c[i]); bcnn:= bcnn*c[i] div uc; end; Writeln('bcnn =',bcnn); readln; end.