Partage de codes sources - CodesWall.info
pascal
> test en pascal
Titre
test en pascal
Postée le
01-12-2011
Affichée
142
Mini-lien
Description
Ca vient de ce site : http://tdprog.free.fr/pascal/td-pascal/lancedes/lancedes.html
Etat
Ne contient pas d'erreurs.
Code d'insertion
Options
Tweet
Téléchargement
var
nbTirages
:
Integer
;
BEGIN
randomize;
repeat
write
(
'Nombre de tirages : '
)
;
readln
(
nbTirages
)
;
if
nbTirages>
0
then
begin
initEff;
tirages
(
nbTirages
)
;
calcFreq;
afficheTout;
end
;
until
nbTirages<
=
0
;
END
.
Postez votre code-source
Informations
Catégorie *
-
ActionScript3
ASP
C
C#.Net
C++
COBOL
CSS
Delphi
Fichier .ini
HTML4
HTML5
Java
javascript
jQuery
Latex
MatLab
mIRC
MySQL
Objective-C
OCaml
pascal
Perl
Php
Python
QBasic
Ruby
Script Batch
Shell
SmallTalk
VB.Net
VBA
Visual Basic
XML
Autre
Titre *
(50 car. max)
Description *
(200 car. max)
Le code
Fonctionne
Ne fonctionne pas
Je ne sais pas
Source
* : Champs obligatoires
Fermer
Accueil
Poster
Actualités
Règles
Contact
Partenaires
Infos / Aide
ActionScript3
(0)
ASP
(0)
C
(65)
C#.Net
(4)
C++
(51)
COBOL
(0)
CSS
(21)
Delphi
(0)
Fichier .ini
(5)
HTML4
(16)
HTML5
(2)
Java
(48)
javascript
(35)
jQuery
(0)
Latex
(6)
MatLab
(3)
mIRC
(3)
MySQL
(13)
Objective-C
(1)
OCaml
(4)
pascal
(9)
Perl
(11)
Php
(58)
Python
(3)
QBasic
(1)
Ruby
(1)
Script Batch
(8)
Shell
(10)
SmallTalk
(1)
VB.Net
(5)
VBA
(5)
Visual Basic
(6)
XML
(17)
Autre
(18)
\n
Forum informatique