Sayfayı Yazdır - boolean kullanımı ve true , false örneği

Başlık: boolean kullanımı ve true , false örneği
Gönderen: command - 10 Kasım 2009 - 22:30:25


uses crt;
var a : boolean;
	i:char;

BEGIN
	highvideo;
	write('query : ');
	i:=readkey;
	if i='1' then
	begin;
		a:=true;
		write(a);
	end
	else
		a:=false;
	if a=false then
	writeln(a);
	normvideo;
	halt(0)
END.

Ubuntu Türkiye

Yazılım => Programlama => Pascal/Lazarus => Konuyu başlatan: command - 10 Kasım 2009 - 22:30:25