aide sur pascal

الموضوع في 'أرشيف المنتدى التعليمي' بواسطة مكشخ جنوبي, بتاريخ ‏29 جانفي 2009.

  1. مكشخ جنوبي

    مكشخ جنوبي عضو نشيط

    إنضم إلينا في:
    ‏11 ماي 2008
    المشاركات:
    155
    الإعجابات المتلقاة:
    47
      29-01-2009 22:17
    بسم الله الرحما ن الرحيم
    السلام عليكم اعضاء منتدى تونيزيا سات
    ممكن تساعدوني في pascal
    exercice
    effectuer un algoritme et une traduction pascal qui permet d ' authentifier à l' utilisateur comme suit :
    -le programme affichera ' des messages refusee, accepter , voulez vouz continuer
    -l ' utilisateur dispose d' au maximum 3 essai pour taper son mot de passe
    - le mot de passe est constant

    ارجوكم اكيد في اسرع وقت من هده الليلة
    عندي امتحان غدوة
    وشكرا ( ادرس في الباك)
     
  2. jouiliwadie

    jouiliwadie عضو مميز

    إنضم إلينا في:
    ‏24 مارس 2008
    المشاركات:
    1.205
    الإعجابات المتلقاة:
    2.096
      31-01-2009 16:05
    يا خويا وضّح المطلوب نساعدوك

    :easter:
     
  3. invite2

    invite2 عضو نشيط

    إنضم إلينا في:
    ‏31 جانفي 2008
    المشاركات:
    169
    الإعجابات المتلقاة:
    109
      01-02-2009 18:37
    :besmellah1:
    program mot_de_passe;
    uses wincrt;
    const pw='ecriver_ici_le_mot_de_passe';
    var ch:string;
    begin
    repeat
    writeln('donner la mot de passe: ');
    readln(ch);
    i:=i+1;
    if(ch= pw ) then writeln('accepter') else writeln ('refuser');
    until ( (ch=pw) or (i=3))
    End.
     

مشاركة هذه الصفحة

جاري تحميل الصفحة...