viết chương trình nhập điểm kiểm tra học kì môn tin cho N học sinh và in ra màn hình với n và điểm kiểm tra được nhập từ bàn phím sử dụng biến mảng

0 bình luận về “viết chương trình nhập điểm kiểm tra học kì môn tin cho N học sinh và in ra màn hình với n và điểm kiểm tra được nhập từ bàn phím sử dụng biến mảng”

1. program bai1;
   var a:array[1..100] ò longint;
   i,n:longint;
   begin
   {Thu tu hoc sinh duoc viet theo a[..]}
   repeat
   write(‘N= ‘);
   readln(n);
   until n>0;
   for i:=1 to n do

   begin
   write(‘a[‘,i,’]= ‘);
   readln9a[i]);
   end;
   write(‘Diem cua ‘,n,’ hoc sinh la ‘);
   for i:=1 to n do
   write(a[i],’ ‘);
   readln
   end.

   Bình luận

2. program ct;

   uses crt;

   var n,i:integer;                      

   A:array[1..100] of real;

   begin

   clrscr;

      write(‘nhap so hoc sinh=’);readln(n);

       for i:=1 to n do

   begin

      write(‘nhap mang A[‘,i,’]:=’);readln(A[i]);

   end;

      writeln(‘diem vua nhap la:’);

         for i:=1 to n do

      write(A[i],’  ‘ );

   readln

   end.

   Bình luận