Về bài tập pascal

dodongchien123 · 16/1/15

làm sao để khi nhập sai số trong pascal thì nó sẽ quay trở lại lệnh đầu???
ví dụ:
mời bạn nhập vào số chẵn: 3
ban đã nhập sai, mời bạn nhập lại
mời bạn nhập số chẵn:...
cảm ơn mọi người

megamanx852 · 7/3/15

Reply: về bài tập pascal

procedure nhap(var a:integer);
begin
write('moi ban nhap so chan: ');readln(a);
end;

var a:integer;
begin

repeat nhap(a) until a mod 2 =0;
writeln('cam on ban da nhap dung');
readln;

end.

hackerchangetheworld · 14/7/15

Reply: về bài tập pascal

megamanx852:
procedure nhap(var a:integer);
begin
write('moi ban nhap so chan: ');readln(a);
end;

var a:integer;
begin

repeat nhap(a) until a mod 2 =0;
writeln('cam on ban da nhap dung');
readln;

end.

Đúng rồi :beat_brick: nhưng thêm đoạn code ghi bạn đã nhập sai mời bạn nhập lại thấy hay hơn thím ạ :troll:

Về bài tập pascal

megamanx852

hackerchangetheworld

Jin

Bài viết mới nhất

Bài viết đang hot

Thống kê

Bài viết được quan tâm nhiều