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.

12 tháng 3 2022

tham khảo

Program Hotboy;

 

Uses crt;

 

Var A:array[1..100] of integer;

 

I,n : byte;

 

S:real;

 

Begin

 

Clrscr ;

 

S:=1;

 

Write('nhao so phan tu trong day'); readln(n);

 

For i:=1 to n do 

 

Begin

 

Write('A[',i,']'); readln(A[i]); 

 

End;

 

For i:=1 to n do

If A[i] mod 5 =0 then 

S:=S* A[i] ; 

 

Writeln('Tong cac phan tu chia het cho 5 trong mang la',S); 

 

Readln

 

End.

uses crt;

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

i,n,t:integer;

begin

clrscr;

readln(n);

t:=1;

for i:=1 to n do 

  if a[i] mod 2<>0 then t:=t*a[i];

writeln(t);

readln;

end.

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

for i:=1 to n do  

  s:=s+i;

writeln(s);

readln;

end.

4 tháng 5 2023

var a:array[1..99] 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]);

if a[i] mod 2 <> 0 then s:=s+a[i];

end;

writeln('Tong cac so le cua day la ',s);

write('Day dao nguoc la ');

for i:=n downto 1 do

write(a[i]:8);

readln

end.

1 tháng 7 2023

```cpp
#include <iostream>
#include <vector>
#include <algorithm>

int main() {
int n;
std::cout << "Enter the number of integers (n < 10^5): ";
std::cin >> n;

std::vector&lt;int&gt; numbers(n); std::cout &lt;&lt; &quot;Enter &quot; &lt;&lt; n &lt;&lt; &quot; integers: &quot;; for (int i = 0; i &lt; n; ++i) { std::cin &gt;&gt; numbers[i]; } int sumOfOdd = 0; for (int i = 0; i &lt; n; ++i) { if (numbers[i] % 2 != 0) { sumOfOdd += numbers[i]; } } std::sort(numbers.begin(), numbers.end()); std::cout &lt;&lt; &quot;Sum of odd integers: &quot; &lt;&lt; sumOfOdd &lt;&lt; std::endl; std::cout &lt;&lt; &quot;Sorted sequence: &quot;; for (int i = 0; i &lt; n; ++i) { std::cout &lt;&lt; numbers[i] &lt;&lt; &quot; &quot;; } std::cout &lt;&lt; std::endl; return 0;

}
```

Bài 1:

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,t;

int main()

{

cin>>n;

t=0;

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

{

cin>>x;

if ((x<0) and (x%2!=0)) t=t+x;

}

cout<<t;

return 0;

}

18 tháng 2 2023

n = int(input('Nhập n ( n < 150): '))

if n >= 150:

     print('n phải nhỏ hơn 150')

else:

     arr = [ ]

     total = 0

     # Nhập vào dãy số nguyên

     for i in range(n):

          arr.append(int(input('Nhập phần tử thứ ' + str(i+1) + ': ')))

     # In dãy vừa nhập

     print('Dãy vừa nhập là: ', end='')

     for i in range(n):

          print(arr[i], end=' ')

     # Tính tổng các phần tử lẻ

     for i in range(n):

          if arr[i] % 2 != 0:

               total += arr[i]

     print('\nTổng các phần tử lẻ là:', total)

    

#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++)

if (i%3==0) t+=i;

cout<<t<<endl;

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

if (a[i]<0) cout<<a[i]<<" ";

return 0;

}

10 tháng 5 2023

Câu 1:

var i,n:integer;

s:longint;

begin

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

for i:=1 to n do

s:=s+2*i+1;

write('tong la: ',s);

readln

end.

10 tháng 5 2023

Câu 2

Bài 5:

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

i,n,max:integer;

Begin

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

For i:=1 to n do

Begin

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

End;

Write('Cac phan tu am la: ');

For i:=1 to n dko

if b[i]<0 then write(b[i]:8);

writeln;

max:=b[1];

For i:=2 to n do

If b[i] > max then max:=b[i];

write('So lon nhat la ',max);

Readln

End.