Hãy nêu cách dùng boolean và Vd với ạ

0 bình luận về “Hãy nêu cách dùng boolean và Vd với ạ”

1. cú pháp: var <danh sách biến>: boolean;

   VD:

   var kt: boolean;

   i,n,d: integer;

   begin

   clrscr;

   write (‘nhap n: ‘);  readln (n);

   for i:=1 to n do if n mod i=0 then d:=d+1;

   if d=2 then kt:=true else kt:=false;

   if kt=true then write (n,’ la snt’)

   else (n,’ khong phai la so nguyen to’);

   readln;

   end.

   Bình luận

2. Cú pháp khai báo:

   var <tên biến>: boolean;

   Cách dùng:

   gán với hai giá trị : True hoặc false

   đồng thời khi thực hiện phép so sánh có thể chỉ nhập mỗi tên biến chương trình sẽ ngầm hiểu là so biến với giá trị true

   Ví dụ

    a,b:boolean;

   a:=true;b:=false;

   if a<>b then i:=1;

   Bình luận