لو لم أكن معموري لتمنيت أن أكون معموري
 
الرئيسيةالأعضاءالمجموعاتالتسجيلدخول

شاطر | 
 

 {********Remplissage d’un tableau- Récursif********}

اذهب الى الأسفل 
كاتب الموضوعرسالة
marouene

avatar

عدد الرسائل : 155
العمر : 30
الوصف الشخصى : sqw
تعيين الادارة :
تاريخ التسجيل : 29/10/2008

مُساهمةموضوع: {********Remplissage d’un tableau- Récursif********}   السبت 1 نوفمبر - 1:24

{********Remplissage d’un tableau- Récursif********}
procedure saisie_tab(var v:tab; d,xn:integer); {il est préférable de ne pas désigner un entier par la lettre x, choisissez a, b,c, n ,d, …)
begin
if(d<=xn) then
begin
readln(v[d]); {Eviter le READ, il cause plein de pbs, exécutez ces modules pour un tableau de caractères ou de chaînes et vous allez constater les anomalies !}
saisie_tab(v,d+1,xn)
end;
end;
{**************Affichage d’un tableau- Récursif***********}
procedure affich (v:tab ; d,xn: integer);
begin
if(d<=xn) then
begin
write(v[d], ' ');
affich(v,d+1,x)
end;
end;
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
mohamedhk2



عدد الرسائل : 103
العمر : 29
الوصف الشخصى : maamouri 7or
تعيين الادارة :
تاريخ التسجيل : 18/11/2008

مُساهمةموضوع: رد: {********Remplissage d’un tableau- Récursif********}   الأربعاء 26 نوفمبر - 22:39

MERCIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://3w.sartimes2.com#3w.tunisia-sat.com
 
{********Remplissage d’un tableau- Récursif********}
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتديات معمورة لوف --- forum maamoura love :: الأقسام العامة :: Special BAC 2008/2009-
انتقل الى: