program vergelijk; uses wincrt;
var
	getal_1, getal_2: integer;
	ver_1: boolean;
begin
	write('Geef het eerste getal: ');
	read(getal_1);
	write('Geef het tweede getal: ');
	read(getal_2);
	ver_1:=getal_1<=getal_2;
	writeln('De bewering dat');
	writeln('getal_1 kleiner is dan of gelijk is aan getal_2');
	writeln('is: ', ver_1 , '.')
end.