اقتباس:
المشاركة الأصلية كتبت بواسطة là bOùrGeOise
هذه محاولتي الخاصة لحل هذا التمرين:
Algorithme:exercice (ecrit ton propre titre
Var:age:real; hadhou houma les données
Begin
Readln (age); houa lmoutaghayer
If (age<10) then
Writeln ('debutant') hna ma nhotoch l point virgule psq ba3dha else
Else
If (10<= age<16) then
Writeln ('minime') hna thani ma nhotoch point virgule
Else
If (16 <=age< 18) then
Writeln ('cadet') hna thani
Else
Writeln ('senior') ; hna n7tto point virgule
Fin.
|
raki dirti program pascal mach algo