Viết chương trình nhập vào số nguyên lớn hơn 50. Nếu người dùng nhập số nhỏ hơn hoặc bằng 50 thì yêu cầu nhập lại.
2 câu trả lời
uses crt;
var i,n:integer;
begin
clrscr;
Repeat
write('Nhap so n>50: ');
readln(n);
until n>50;
end.
uses Crt;
var i,n:integer;
start
Clrscr;
repeat
write('Nhap so n>50 ');
readln(n);
until n>50;
end.