Βρε εσύ κάντος όπως σε βολεύει! μπορείς και σε Pascal :P
Begin
Good_Wines: LongInt;
If ("Good wines" ) Then
Good_Wines:= Good_Wines+ 1;
printscr( Good_Wines);
End If;
End;
__________________
Μην αδικείς την ζωή είναι από μόνη της άδικη!
Όλα για το χόμπι!
...τώρα το έχω ρίξει στην κατασκευή site και την φιλοξενία Go ZEN Host
|