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 bt;
   uses crt;
   var a: array [1..100] of real;
         n,i: longint;
   begin
   clrscr;
   writeln(‘nhap so hoc sinh’); readln(n);
   for i:= 1 to n do begin
   writeln(‘nhap diem cua ban thu ‘,i); readln(a[i]); end;
   clrscr;
   for i:= 1 to n do writeln(‘Ban thu ‘,i,’ co diem la ‘,a[i]:2:1); 
   readln
   end.

   Bình luận

2. program diemkiemtrahocki;

   uses crt;

   var a:array[1..100]of real;

   n,i:integer;

   begin

   clrscr;

   write(‘Nhap so hoc sinh:’); readln(n);

   for i:=1 to n do

   begin

   write(‘Nhap diem mon Tin cua hoc sinh thu ‘,i,’=’); readln(a[i]);

   end;

   for i:=1 to n do

   writeln(‘Diem cua ban thu ‘,i,’=’,a[i]:4:2);

   readln;

   end.

   Bình luận