Rasgele sayı üreten ve ekrana yazan progam.

uses crt;
   var
   a:integer;
   begin
   randomize;
   a:=random(10);
   writeln(a);
   readln;
   end.


Linkback: https://www.buyuknet.com/rasgele-sayi-ureten-ve-ekrana-yazan-progam-t8607.0.html