Pascal lớp 8

[skin king mc]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

viết CT nhập mảng gồm N phần tử

 

[Vũ Ngọc Khang]

program mang;
uses crt;
var n,i:integer;
begin
write('Nhap n=');readln(n);
for i:=1 to n do
writeln('A[',i,']=');readln(a);
end.