Câu 3: Viết chương trình nhập mảng 5 phần tử số nguyên và in ra màn hình 5 số nguyên đó?

0 bình luận về “Câu 3: Viết chương trình nhập mảng 5 phần tử số nguyên và in ra màn hình 5 số nguyên đó?”

1. Program Hotboy;

   Uses crt;

   Var a:array[1..5] of integer;

   i:real;

   Begin

   For i:=1 to 5 do

   Write(‘A[‘,i,’]’); 

   Readln(A[i]);

   Readln

   End.

   Bình luận

2. var a: array [1..5] of longint;

        i:byte;

   begin

   for i:=1 to 5 do

   begin

   write(‘Nhap phan tu thu ‘,i,’ : ‘); read(a[i]);

   end;

   writeln;

   writeln(‘Mang vua nhap la: ‘);

   for i:=1 to 5 do write(a[i],’ ‘);

   readln

   end.

   Bình luận