K
Khách

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.

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,t;

int main()

{

cin>>n;

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

for (i=1; i<=n; i++) cout<<a[i]<<" ";

cout<<endl;

t=0;

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

cout<<t;

return 0;

}

15 tháng 5 2023

'''python

a. DTB = []

siso = int(input("Nhập số lượng học sinh trong lớp: "))

b. for i in range(siso):

diem = float(input(f"Nhập điểm của học sinh thứ {i+1}: "))

DTB.append(diem)

c. tong=sum(DTB)

d. print(f"Tổng điểm của lớp là: {tong}")'''

2 tháng 5 2022

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

i,n,d,max:integer;

Begin

Write('Nhap so luong phan tu cua mang ');readln(n);

For i:=1 to n do

Begin

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

End;

max:=a[1];

For i:=2 to n do

Begin

If a[i] > max then

Begin

max:=a[i];

d:=i;

End;

End;

Write('Phan tu lon nhat la ',max,' o vi tri ',d);

Readln;

End.

2 tháng 5 2022

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

i,n,d,max:integer;

Begin

Write('Nhap so luong phan tu cua mang ');readln(n);

For i:=1 to n do

Begin

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

End;

max:=a[1];

For i:=2 to n do

Begin

If a[i] > max then

Begin

max:=a[i];

d:=i;

End;

End;

Write('Phan tu lon nhat la ',max,' o vi tri ',d);

Readln;

End.

uses crt;

var i,n,k:integer;

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

kt:boolean;

begin

clrscr;

readln(n);

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

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

writeln;

readln(k);

kt:=false;

for i:=1 to n do 

  if a[i]=k then kt:=true;

if (kt=true) then write('Co k trong mang')

else writeln('Khong co k trong mang');

readln;

end.

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

i,n:integer;

begin

clrscr;

readln(n);

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

readln;

end.

25 tháng 4 2023

program TinhTongPhanTuMang;
var
  i, tong: integer;
  m: array[1..50] of integer;

begin
  for i := 1 to 50 do
  begin
    writeln('Nhap ptu thu ', i, ': ');
    readln(m[i]);
  end;
  tong := 0;
  for i := 1 to 50 do
  begin
    tong := tong + m[i];
  end;
  writeln('Tong cac ptu trong mang la: ', tong);
  writeln('Cac ptu trong mang la:');
  for i := 1 to 50 do
  begin
    writeln(m[i]);
  end;
end.

5 tháng 4 2023

E cần câu trl gấp ạk 

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,t,dem;

int main()

{

cin>>n;

dem=0;

t=0;

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

{

cin>>x;

if (x%2==0 && x>10) t+=x;

if (x%2!=0 || x<100) dem++;

}

cout<<t<<" "<<dem;

return 0;

}