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.

21 tháng 4 2023

var A:array [1..40] of string;

 

21 tháng 4 2023

var A: array [1..40] of string;

uses crt;

var b:array[1..25]of integer;

i,n:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

write('B[',i,']='); readln(b[i]);

end;

readln;

end.

5 tháng 5 2022

Câu 1: Cú pháp khai báo mảng trong pascal:

Var <tên mảng>:array[1..n] of <kiểu dữ liệu>;

Cây 2: Khai báo mảng c gồm 20 phần tử kiểu số thực:

Var c:array[1..20] of real;

a: var diem:array[1..200]of real;

b) var x:array[1..200]of integer;