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],n,i;

//chuongtrinhcon

bool ktnt(long long x)

{

if (x<=1) return(false);

for (int i=2; i*i<=x; i++)

if (x%i==0) return(false);

return(true);

}

//chuongtrinhchinh

int main()

{

cin>>n;

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

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

return 0;

}

Câu 1: D

Câu 2: A

16 tháng 5 2022

Bạn VÔ đây mà tham khảo :

https://sachgiaibaitap.com/sach_giai/giai-tin-hoc-lop-11-bai-7-cac-thu-tuc-chuan-vao-ra-don-gian/#gsc.tab=0

~chucs hok tốt

16 tháng 5 2022

cảm ơn nha 

13 tháng 4 2023

Uses crt;

var n,i: integer;

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

begin clrscr;

readln(n);

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

writeln(a[i]:3);

readln;

end.

26 tháng 7 2023

Tham khảo!

a) Lỗi được phát hiện khi thực hiện chương trình với bộ dữ liệu Hình 6b: a = 0, b = 2 và Hình 6c: a = 0, b = 0.

b) Câu lệnh trực tiếp tạo ra lỗi là: Media VietJack

Câu lệnh liên quan đến lỗi là: Media VietJack

c) Nguyên nhân gây ra lỗi này là: lỗi logic vì phép chia cho 0 là không xác định.

4 tháng 1 2022

1B

2D

23 tháng 10 2022

sai rồi

 

Câu 1: 

a) var a:array[1..50]of real;

b) a[5]:=8;

c) for i:=1 to 50 do  

begin

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

end;

for i:=1 to 50 do 

 write(a[i]:4);

 

Câu 2: 

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do 

  s:=s+i;

writeln(s);

readln;

end.