Bài 7. Câu lênh lặp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hòa An Lê

Viết CT nhập điểm Kiểm tra học kì môn Tin cho N học sinh và in CT với N và điểm kiểm tra nhập từ bàn phím (sd biến mảng)

Giusp mik với ạ, mk đang cần gaapsppppp lamwsmmmm ạ!!!

Nguyễn Lê Phước Thịnh
26 tháng 6 2020 lúc 20:52

uses crt;

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

n,i,t:integer;

begin

clrscr;

write('Nhap so hoc sinh='); readln(n);

for i:=1 to n do

begin

repeat

write('Nhap diem hoc ki mon Tin cho hoc sinh thu ',i,'='); readln(a[i]);

until (0<=a[i]) and (a[i]<=10);

end;

for i:=1 to n do

writeln('Diem cua hoc sinh thu ',i,'=',a[i]:4:2);

readln;

end.


Các câu hỏi tương tự
Tran Thi Huong
Xem chi tiết
lyngoc hiep
Xem chi tiết
Thúy Anh
Xem chi tiết
khánh
Xem chi tiết
Maiiii
Xem chi tiết
Nguyễn Thị Vân Trang
Xem chi tiết
Trangg Tranng
Xem chi tiết
Võ Ngọc Đan Kha
Xem chi tiết
Lily
Xem chi tiết