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.

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.

18 tháng 4 2021

Mình cảm ơn bạn nhiều lắm

 

uses crt;

var a:array[1..50]of longint;

i,n:integer;

begin

clrscr;

readln(n);

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

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

readln;

end.

#include <bits/stdc++.h>;
using namespace std;
int main()
{
    long i,n;
    float tbc,dem,t,a[10000];
    cin>>n;
    for (i=1; i<=n; i++)
    {
        cin>>a[i];
    }
    dem=0;
    t=0;
    for (i=1; i<=n; i++)
        if (a[i]<0)
    {
        dem=dem+1;
        t=t+a[i];
    }
    tbc=t/dem;
    cout<<fixed<< setprecision(2)<<tbc;
    return 0;
}

 

19 tháng 8 2023

#include <iostream>

#include <cmath>

using namespace std;

bool isPrime(int number) {

     if (number < 2) {

          return false;

     }

     for (int i = 2; i <= sqrt(number); i++) {

          if (number % i == 0) {

               return false;

          }

     }

     return true;

}

int main() {

     int N;

     cin >> N;

     int count = 0;

     for (int i = 0; i < N; i++) {

          int num;

          cin >> num;

          if (isPrime(num)) {

               count++;

          }

     }

     cout << "Số lượng số nguyên tố trong dãy là: " << count << endl;

     return 0;

}

16 tháng 8 2023

chú ý làm c++ nhé !

 

22 tháng 10 2021

Anser reply image

 
27 tháng 12 2016

Bài 1.

Bước 1. Nhập N và dãy số \(a_1,a_2,...,a_N\)

Bước 2. \(i\leftarrow1\), \(S\leftarrow0\)

Bước 3. \(i\leftarrow i+1\)

Bước 4. 4.1 Nếu \(i>N\) thì kết thúc thuật toán và đưa ra kết quả.

4.2 \(a_i\ge0\) thì quay lại bước 3

4.3 \(S\leftarrow S+a_i\) rồi quay lại bước 3

8 tháng 10 2018

S là gì