قسم الرياضيات و الإعلام الإلي

www.univ-soukahras.dz/ar/dept/mi

المقياس: Algorithmique et structure de données 1

  1. معلومات
  2. الأسئلة
  3. التعليم عن بعد

jour suivant

0 votes

Écrire un algorithme qui donne la date de demain (jour suivante) à partir de celle d'aujourd'hui

La date est donnée sous la forme jj\mm\aaaa

نشر على 15:04, الجمعة 25 نوف 2016 By dhoha bouhama (6 points)
In Algorithmique et structure de données 1


أجوبة (8)




جواب (1)

0 votes

program date;

uses crt;

var d,m,y:integer;

begin

clrscr;

writeln('donnez la date complet');

readln(d,m,y);

if ((d<30) et (m<12)) then

  write('la date d'aujourd'hui est:',d+1,m,y)

 else

    if ((d=30) et (m<12)) then

       writeln('la date d aujourd'hui est:',d,m+1,y)

    else

       writeln('la date est:',d,m y+1)

end.

نشر على 11:14, السبت 11 نوف 2017 by rayene ridane (228 points)
In Algorithmique et structure de données 1



جواب (2)

0 votes

algorithme date;

var j,m,a:entier;

debut

écrire('donnez la date complet');

lire(j,m,a);

si ((j<30) et (m<12)) alors

  écrire('la date est:',j+1,m,a)

sinon

  si ((j=30) et (m<12)) alors

     écrire('la date est:',j,m+1,a)

    sinon

     écrire('la date est',j,m,a+1)

fin.

نشر على 12:33, السبت 11 نوف 2017 by Haifa Benlassowd (76 points)
In Algorithmique et structure de données 1



جواب (3)

0 votes

program date;

var d,m,y:integer;

begin

writeln('entrer la date de ca jour');

readln(d,m,y);

if (d<30) then if (m<12) then

  write('la date de demen est:',d+1,m,y)

 else

    if (d=30) then if (m<12) then

       writeln('la date de demen est:',d,m+1,y)

    else

       writeln('la date de demen est:',d,m y+1)

readkey;

end.

نشر على 13:17, السبت 11 نوف 2017 by oussama baha eddine farhi (257 points)
In Algorithmique et structure de données 1



جواب (4)

0 votes

algorithme date;

var j,m,a:entier;

debut

écrire('donnez la date complet');

lire(j,m,a);

si ((j<30) et (m<12)) alors

  écrire('la date est:',j+1,m,a)

sinon

  si ((j=30) et (m<12)) alors

     écrire('la date est:',j,m+1,a)

    sinon

     écrire('la date est',j,m,a+1)

fin.

نشر على 21:41, الخميس 16 نوف 2017 by touaitia ouassim (12 points)
In Algorithmique et structure de données 1



جواب (5)

0 votes

algorithme date ;

var m, j,a : entier ;

debut

ecrire(' donnez la date de ce jour  ''comple' ) ;

lire( j, m,a);

si ((j<30) et ( m<12) ) alors

ecrire( ' la date : ' ,j, m+1, a ) 

sinon

si ( ( j =30) et ( m <12)) alors

ecrire( ' la date est ' , j, m+1,a )

sinon

ecrire ( ' la date est ', j,m, a+1 ) ;

fin . 

نشر على 01:34, الجمعة 17 نوف 2017 by Amani Haraoubia (47 points)
In Algorithmique et structure de données 1



جواب (6)

0 votes

program date;

var d,m,y:integer;

begin

writeln('entrer la date de ca jour');

readln(d,m,y);

if (d<30) then if (m<12) then

  write('la date de demen est:',d+1,m,y)

 else

    if (d=30) then if (m<12) then

       writeln('la date de demen est:',d,m+1,y)

    else

       writeln('la date de demen est:',d,m y+1)

readkey;

end.

نشر على 19:06, الثلاثاء 5 ديس 2017 by oussama baha eddine farhi (257 points)
In Algorithmique et structure de données 1



جواب (7)

0 votes

program date;

var d,m,y:integer;

begin

writeln('entrer la date de ca jour');

readln(d,m,y);

if (d<30) then if (m<12) then

  write('la date de demen est:',d+1,m,y)

 else

    if (d=30) then if (m<12) then

       writeln('la date de demen est:',d,m+1,y)

    else

       writeln('la date de demen est:',d,m y+1)

readkey;

end.

نشر على 19:06, الثلاثاء 5 ديس 2017 by oussama baha eddine farhi (257 points)
In Algorithmique et structure de données 1



جواب (8)

0 votes

program date;

var d,m,y:integer;

begin

writeln('entrer la date de ca jour');

readln(d,m,y);

if (d<30) then if (m<12) then

  write('la date de demen est:',d+1,m,y)

 else

    if (d=30) then if (m<12) then

       writeln('la date de demen est:',d,m+1,y)

    else

       writeln('la date de demen est:',d,m y+1)

readkey;

end.

نشر على 19:06, الثلاثاء 5 ديس 2017 by oussama baha eddine farhi (257 points)
In Algorithmique et structure de données 1



هل لديك جواب ?