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.

9 tháng 3 2023

Program HOC24;

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

i,n : integer;

t: longint;

begin

write('Nhap N: '); realdn(n);

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do if a[i] mod 3 = 0 then t:=t+a[i];

write('Tong cac so la boi cua 3 trong danh sach la: ',t);

readln

end.

11 tháng 3 2023

a = []

sum = 0

n = 5

# Nhập danh sách a

for i in range(n):

     x = int(input("Nhập phần tử thứ " + str(i+1) + ": "))

     a.append(x)

# Tính tổng các phần tử trong danh sách a

for i in range(n):

     sum += a[i]

# In ra màn hình tổng các phần tử trong danh sách a

print("Tổng các phần tử trong danh sách a là: ", sum)

24 tháng 7 2023

cứu em với mn còn 30p cuối thôi

25 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long n,i,x,dem;

int main()

{

cin>>n;

dem=0;

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

{

cin>>x;

if (x==50) dem++;

}

cout<<dem;

return 0;

}

26 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long n,i,x,dem;

int main()

{

cin>>n;

dem=0;

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

{

cin>>x;

if (x==27) dem++;

}

cout<<dem;

return 0;

}

27 tháng 10 2021

a)

Input: số nguyên dương n và dãy số A1,A2,...,An

Output: Số phần tử có giá trị bằng 27

b) Thuật toán liệt kê:

Bước 1: Nhập n và dãy A1,A2,..,An

Bước 2: Dem←0; i←1;

Bước 3: Nếu i>n thì in ra Dem và kết thúc

Bước 4: Nếu Ai = 27 thì Dem←Dem+1;

Bước 5: i←i+1, quay lại bước 3

25 tháng 10 2021

program Tin_hoc;

Uses crt;

var i,n,k,dem:integer;

     a;array[1..10000] of integer;

Begin

clrscr;

write('Nhap n: ');readln(n);

writeln('Nhap ',n,' pha tu cua day A:');

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

dem:=0;

write('Nhap k: ');readln(k);

for i:= 1 to n do if a[i] = k then inc(dem);

writeln('Day A co ',dem,' ki tu ',k,);

readln;

end.