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 ma
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 (sử dụng biến mảng)
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 ma
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 (sử dụng biến mảng)
program ct;
uses crt;
var D:array[1..20] of real;
i,N:integer;
begin clrscr;
write(Nhap so hs: ‘); readln(N);
for i:=1 to N do
begin
writeln(‘Nhap diem hs thu ‘,i,’: ‘); readln(D[i]);
end;
for i:=1 to N do
writeln(‘Diem toan hs thu ‘,i,’ la: ‘,D[i]:4:2);
readln;
end.
Học tốt!
program ct;
uses crt;
var i,n:integer;
A:array[1..50] of integer;
begin
clrscr;
write(‘nhap so hoc sinh:=’);readln(n);
for i:=1 to n do
begin
write(‘nhap diem A[‘,i,’]:=’);readln(A[i]);
end;
writeln(‘diem cua tat ca hoc sinh la:’);
for i:=1 to n do
write(A[i],’ ‘);
readln
end.