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.

Câu 1(3đ). Hãy khai báo mảng một chiều lưu trữ 100 phần tử số nguyên có giá trị trong khoảng từ 0 đến 255 bằng cách: a. Trực tiếp; b. Gián tiếp: c. Tham chiếu đến phần tử thứ 50 và gán giá trị bằng 45. Câu 2(4đ). Viết chương trình nhập N và N số nguyên a,, a2,..an. Tính tổng các phần tử chăn chia hết cho 3. Câu 3 (3đ). Cho đoạn chương trình sau: a. Với: N=6; k=8 A= 45 56 73 64 55 98 Program Bai3; Type KM-array[1..100] of...
Đọc tiếp

Câu 1(3đ). Hãy khai báo mảng một chiều lưu trữ 100 phần tử số nguyên có giá trị trong khoảng từ 0 đến 255 bằng cách: a. Trực tiếp; b. Gián tiếp: c. Tham chiếu đến phần tử thứ 50 và gán giá trị bằng 45. Câu 2(4đ). Viết chương trình nhập N và N số nguyên a,, a2,..an. Tính tổng các phần tử chăn chia hết cho 3. Câu 3 (3đ). Cho đoạn chương trình sau: a. Với: N=6; k=8 A= 45 56 73 64 55 98 Program Bai3; Type KM-array[1..100] of LongInt; Var a:KM; i,N, k:Integer; Begin Write('Nhap N= ');Readln (N); Write('Nhap k= '); Readln (k); For i:-1 to n do Begin Write(Nhap a[',I,']= '); Readln(a[i]); If trunc (sqrt (a(i]))=k then Write (i:6); End; Chương trình sẽ đưa ra kết quả gì? b. Với: N=6; k=5 A= 45 56 73 64 55 98 Chương trình sẽ đưa ra kết quả gì? c. Sửa điều kiện lệnh If thành kiểm tra xem a[i] có là số chính phương hay không? (Số chính phương là: x2 = ai. VD 9 = 32; 16 = 42; 81 = 92) Readln; End.

0

Trực tiếp: Var a:array[1..300]of byte;

Gián tiếp:

Type: mang=array[1..300]of byte;

Var a:mang;

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

b) a[5]:=8;

22 tháng 4 2022

Program HOC24;

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

i,n,d: integer;

tbc: real;

t: longint;

begin

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

for i:=1 to n do 

begin

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

end;

t:=0;

for i:=1 to n do t:=t+a[i];

writeln('Tong cac phan tu cua mang la: ',t);

d:=0; 

for i:=1 to n do if a[i]=5 then d:=d+1;

writeln('Co ',d,' phan tu co gia tri bang 5');

tbc:=0;

for i:=1 to n do if a[i] mod 2=1 then tbc:=tbc+a[i];

tbc:=tbc/n;

writeln('Trung binh cong cac phan tu le la: ',tbc:6:2);

write('Mang sau khi thay la: ');

for i:=1 to n do if a[i]=0 then a[i]:=10;

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

readln

end.

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.

16 tháng 4 2023

var
  A: array[1..100] of Integer;

 

16 tháng 4 2023

Thank

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}")'''

Để in giá trị của phần tử thứ 6 trong biến mảng, ta sử dụng câu lệnh nào? (1 Point)print(A[i+1])print(A[6])print(A[5])print(A[i])2.Cho khai báo mảng như sau:              a = [0]*nĐể nhập giá trị cho phần tử thứ 20 của mảng a từ bàn phím, ta viết: (1 Point)a=eval(input('a[21]= '))a=eval(input('a[18]= '))a=eval(input('a[20]= '))a=eval(input('a[19]= '))3.Em hãy chọn phát biểu đúng: (1 Point)Mảng là một dãy vô hạn các phần tử.Trong...
Đọc tiếp
Để in giá trị của phần tử thứ 6 trong biến mảng, ta sử dụng câu lệnh nào? (1 Point)print(A[i+1])print(A[6])print(A[5])print(A[i])2.Cho khai báo mảng như sau:
              a = [0]*n
Để nhập giá trị cho phần tử thứ 20 của mảng a từ bàn phím, ta viết:
 (1 Point)a=eval(input('a[21]= '))a=eval(input('a[18]= '))a=eval(input('a[20]= '))a=eval(input('a[19]= '))3.Em hãy chọn phát biểu đúng: (1 Point)Mảng là một dãy vô hạn các phần tử.Trong Python, chỉ số của một mảng mặc định từ số 0 trở điDữ liệu kiểu mảng là tập hợp các phần tử không có thứ tựTrong Python, chỉ số của một mảng mặc định từ số 1 trở đi4.Để nhập dữ liệu từ bàn phím cho mảng A có 10 phần tử là số nguyên, ta dùng lệnh nào sau đây? (1 Point)for i in range(1,10): A[i]=eval(input('A['+str(i)+']= '))for i in range(10): A[i]=eval(input('A['+str(i)+']= '))for i in range(10): A[1]=eval(input('A['+str(i)+']= '))for i range(10): A[i]=eval(input('A['+str(i)+']= '))5.Để nhập giá trị cho các phần tử của mảng, ta sử dụng câu lệnh nào sau đây? (1 Point)if…for…print…elif…6.Cú pháp khai báo nào sau đây đúng nhất? (1 Point)tên biến mảng = [giá trị khởi tạo]*số phần tửtên biến mảng := [giá trị khởi tạo]*số phần tửtên biến mảng = [số phần tử]*giá trị khởi tạotên biến mảng := [số phần tử]*giá trị khởi tạo7.Chọn câu phát biểu đúng? (1 Point)Việc truy cập tới phần tử bất kì của mảng được thực hiện thông qua biến đếm của của câu lệnh lặp for.Kiểu dữ liệu của mảng là intKiểu dữ liệu của mảng phải là floatViệc truy cập tới phần tử bất kì của mảng được thực hiện thông qua chỉ số tương ứng của phần tử đó trong mảng.8.Số phần tử trong khai báo dưới đây là bao nhiêu?
            hocsinh = [70]*80
 (1 Point)8070101509.Phát biểu nào dưới đây về chỉ số của mảng là phù hợp nhất? (1 Point)Dùng để truy cập đến một phần tử bất kì trong mảngDùng để quản lí kích thước của mảngDùng trong vòng lặp với mảng để quản lí kích thước của mảngDùng trong vòng lặp của mảng10.Khai báo nào là đúng trong các khai báo sau đây:Immersive Reader(1 Point)tuoi : [2]-ntuoi = [3]+n;tuoi = [1]*ntuoi := [0]/n
0