Viết chương trình nhập điểm kiểm tra học kì môn Tin Học cho N học sinh và in kết quả ra màn hình với N và điểm kiểm tra của từng học sinh được nhập từ bàn phím .
Viết chương trình nhập điểm kiểm tra học kì môn Tin Học cho N học sinh và in kết quả ra màn hình với N và điểm kiểm tra của từng học sinh được nhập từ bàn phím .
Program Hotboy ;
Uses crt;
Var i,n:integer;
A:array[1..50] of real;
Begin
Clrscr;
Write(‘nhap so hoc sinh lop do’);
Readln(n);
For i:=1 to n do
Begin
Write(‘A[‘,i,’]:=’);
Readln(A[i]);
End;
Writeln(‘diem cua hoc sinh la:’);
For i:=1 to n do
Write(‘hoc sinh thu ‘,i,’ co diem la’,A[i],’ ‘);
Readln
End.
Var i,n: integer;
a:array[1..100] of byte;
Begin
Readln(n);
For i := 1 to n do
Readln(a[i]);
For i:= 1 to n do
Write(a[i],’ ‘);
End.