Department of Mathematics and Computer Science

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

Module: Algorithmique et structure de données 1

  1. Information
  2. Questions

ecrire un algorithme

4 votes

ecrire un algorithme qui à partir d'un nombre de jours donné afiche son équivalent en ans, en mois, en semaines et en jours. Sachant que:

  • l'anneé =365 jours.
  • le mois = 30 jours.
  • la semaine = 7 jours.

 

Asked on 18:18, Wednesday 25 Oct 2017 By Aida BOUZID
In Algorithmique et structure de données 1


answers (32)




Answer (1)

0 votes

;Algorithme tamps

;Var p,ans,m,sem:entier

Debut

;('Ecrire('entrer les jours p:

;(Lire(p

;Ans:=p div 365

;m:=(p mod 365)div30

;Sem:=p mod 30

;(Ecrire(ans, m,sem

.Finsmile

 

Answered on 19:23, Wednesday 25 Oct 2017 by Amina Monebbah (56 points)
In Algorithmique et structure de données 1



Answer (2)

0 votes

Algorithem tmps;

Var nj,ans,smn,ms,jr:entier

Debut

Ecrire('donnez les nomber de jours');

Lire(nj);

Ans:= nj div 365 ;

ms:= (nj mod 365) div 30 ;

Smn :=( nj mod 30) div 7;

jr := nj mod 7;

Ecrire ( ans,' anneè'  ; ms, 'mois' ; smn,' semaine' jr,'jours ' );

Fin.

Answered on 19:46, Wednesday 25 Oct 2017 by Amani Haraoubia (47 points)
In Algorithmique et structure de données 1



Answer (3)

0 votes

Algorithme  Temps ; 

Var NJ , A , M , S , J  : entier ; 

 

Debut 

Ecrire('donnez le nombre de jours svp '); 

Lire(NJ); 

A:=NJ div 365 ; 

M:=(NJ mod 365) div 30 ; 

S:=(NJ mod 30) div 7 ; 

J:=NJ mod 7 ; 

Ecrire( NJ , ' équivalent ' , A , 'ans' , M , 'mois' , S , 'semaine' , J , ' jours ' ) ; 

 

Fin. 

Answered on 19:53, Wednesday 25 Oct 2017 by Feteh HESSAINIA (61 points)
In Algorithmique et structure de données 1



Answer (4)

0 votes

Algorithme date;

Var a,ans,m,sem,j:entier;

Debut

lire(a);

 

Ans:=a div 365;

m:=(a mod 365)div30;

Sem:=(a mod 30)mod 7;

j:=a mod 7;

Ecrire('la date est:',ans,'ans',m,'m',j,'j');

fin.

Answered on 20:20, Wednesday 25 Oct 2017 by oussama baha eddine farhi (257 points)
In Algorithmique et structure de données 1



Answer (5)

0 votes

Algorithme convertit;

var nb,a,m,s,j:entier;

debut

ècrire('donnez le nombre de jour: ');

lire(nb);

a:=nb div 365;

m:=(nb mod 365) div 30;

s:=((nb mod 365) mod 30) div 7;

j:=((nb mod 365) mod 30) mod 7;

ècrire(nb,'=',a,' Anne et ',m,' Mois et ',s,' Semaine et ',j,' Jour ');

fin.

le programme :

la resultat :

Groupe 3 numéro 30

Answered on 20:41, Wednesday 25 Oct 2017 by Haithem Sofiene Maoua (21 points)
In Algorithmique et structure de données 1



Answer (6)

1 votes

ALGORITHME convert;

VAR nbJrs, nbJ, nbMois, nbSem nbAn:entier;

DEBUT

         ECRIRE ('Introduisez le nombre de jours:');

           LIRE (nbJrs);

               NbAn:=nbJrs DIV 365;

               nbMois:=(nbJrs MOD 365) DIV 30;

               nbSem:=((nbJrs MOD 365) MOD 30) DIV 7;

               nbJ:=((nbJrs MOD 365) MOD 30) MOD 7;

         ECRIRE ('jours:',nbJ,'semaines:',nbSem,'mois:',nbMois, 'années:',nbAn);

FIN. 

_G4.

Answered on 21:12, Wednesday 25 Oct 2017 by Adlène Beddiar (18 points)
In Algorithmique et structure de données 1



Answer (7)

0 votes

Answered on 22:27, Wednesday 25 Oct 2017 by khawla Necibi (52 points)
In Algorithmique et structure de données 1



Answer (8)

0 votes

Algorithme convertit;

var nj,a,m,s,j:entier;

début

écrire('donnez le nombre de jour');

lire(nj);

a:=nj div 365;

m:=(nj mod 365 )div 30;

s:=((nj mod 365)mod 30)div 7;

j:=((nj mod 365)mod 30)mod 7;

écrire(nj ,'=',a,'année et',m,'mois et',s,'semaine et ',j,'jour');

Fin.         Groupe : 3

Answered on 09:43, Thursday 26 Oct 2017 by Marwa GHODBANE (54 points)
In Algorithmique et structure de données 1



Answer (9)

0 votes

Algorithe temps;

var j,y,ans,sem,mn:entier;

Debut

ecrire('donnez le nombre de jours');

lire(y);

ans:=y div 365;

mn:=(y mod 365)div 30;

sem:=((y mod 365)mod 30)div 7;

j:=((y mod 365)mod 30)mod 7;

ecrire(y,'=',ans,'ans et ',mn,'moins et ' , sem , 'semaine et ', j , 'joure ');

fin.

 groupe :03

Answered on 10:29, Thursday 26 Oct 2017 by Khaoula Mokrane (50 points)
In Algorithmique et structure de données 1



Answer (10)

0 votes

Algorithme convert;

var nbj, a,m,s : entier;

debut

ecrire(' donnez les nombre de jours ') ;

lire(nbj);

a:= nbj div 365 ;

m:=( nbj mod 365) div 30;

s:=( nbj mod 365) mod 30 ) div 7;

j := ( nbj mod 365) mod 30 ) mod 7;

ecrire ( nbj, ' = ' , a,' annes est', m, ' mois est' ,s, ' semain est ' , j,' jours' );

fin .

G4

Answered on 10:49, Thursday 26 Oct 2017 by ساسية بولعراس (20 points)
In Algorithmique et structure de données 1



Answer (11)

0 votes

algoritme tmps;

var ans,m,s,j:entr;

debut

ecrire(donnz le nombre de jour);

lire(nj);

j:=((nj mod 365)mod 30)mod 7);

ans:=nj div 365;

m:=(nj mod 365)div3;,

s:=((nj mod 365)mod 30)div 7;

j:=(mod365)mod 30)div 7;

ecrire(nj,'=','anneer'et',m,mois ',et',s,semaine et',j,'jour);

fin.

group:3

 

Answered on 10:50, Thursday 26 Oct 2017 by MAROUA BEN AOUDI (8 points)
In Algorithmique et structure de données 1



Answer (12)

0 votes

algorithme convertit;

var nbj, ans,ms,sm,j: entier;

debut

ecrire('donnez le nombre de jours');

lire(nbj);

ans:=(nbj div 365);

ms:=(nbj mod 365)div30;

sm:=(nbj mod 365)div30)div7;

j:=(nbj mod 365)div30)mod7;

ecrire('nbj',ans,'ans et',ms,'mois et',sm,'semaine et',j,'jour');

fin.smilesmile

Answered on 10:55, Thursday 26 Oct 2017 by nabila lahmar (7 points)
In Algorithmique et structure de données 1



Answer (13)

0 votes

algorithme convertion;

var nb,ans,sem,j,m:entier;

debut

ecrire('donnez le nombre des jours');

lire(nb);

ans:=nb div 365;

m:=(nb mod 365)div30;

sem:=((nb mod 365)mod30)div7;

j:=((nb mod 365)mod 30)mod7;

ecrire(nb,'=',ans,'annee et',m,'mois et',sem,'semaine et',j,'jour');

fin.

 

bouis yousra g:3

Answered on 18:57, Thursday 26 Oct 2017 by يسرى بويس (5 points)
In Algorithmique et structure de données 1



Answer (14)

0 votes

algorithme convertit;

var nbj , s , m , j , a : entier;

debut

ecrire('donnez le nombre des jours');

lire(nbj);

a:=(nbj div 365);

m:=(nbj mod 365) div 30;

s:=((nbj mod 365) mod 30 ) div 7;

j:=((nbj mod 365 ) mod 30 ) mod 7;

ecrire (nbj , '=' , a , ' année est: ' , m , ' mois est: ' , s , ' semaine est: ' , j , ' jour est: ');

fin.

bouthaina cheraitia G:3 

Answered on 23:32, Thursday 26 Oct 2017 by Bouthaina Cheraitia (50 points)
In Algorithmique et structure de données 1



Answer (15)

0 votes

Algorithme temps ;

var nbj,ans ,m,smn,j:entier;

debut

ecrire('donnez le nombre de jours');

lire(nbj);

ans:=nbj div 365;

m:=(nbj mod 365 )div 30 ;

smn:=((nbj mod 365 ) mod 30)div 7;

j:=((nbj mod 365 ) mod 30)mod 7;

ecrire(nbj,'=',ans,'annees et ',m,'mois et',smn,'semain et ',j,'jours');

fin.

g3 n 20

 

Answered on 14:29, Friday 27 Oct 2017 by Aicha Azzag (14 points)
In Algorithmique et structure de données 1



Answer (16)

0 votes

algorithme temps;

var: nbj,A,M,S,J : entier;

début

écrire (' donnez le nombre des jours ');

lire (nbj);

A:= nbj div 365;

M:= (nbj mod 365) div 30;

S:= ((nbj mod 365) mod 30) div 7;

J:= ((nbj mod 365) mod30) mod 7;

écrire (nbj,'=', 'année est' A, 'mois est' M, ' semain est' S, ' jours est' J);

fln.

G4 n 2

smile

Answered on 21:29, Friday 27 Oct 2017 by safia benadid (12 points)
In Algorithmique et structure de données 1



Answer (17)

0 votes

algorithme convert

var nbJ , a , m ,s , j : entier ;

debut

ecrire ( 'donnez le nombre de jour ');

lire (nbJ );

a:= nbJ div 365 ;

m:= (nbJ mod 365 ) div 30;

s:= ((nbJ mod 365)mod 30) div 7;

j:= ((nbJ mod 365) mod 30) mod 7 ;

ecrire (nbJ,'=',a 'annee et ',m, 'mois et ' ,s, 'semain et ' ,j, 'jour' );

fin.

GR 03 N:12 smile

 

Answered on 16:43, Saturday 28 Oct 2017 by hadjer haou (22 points)
In Algorithmique et structure de données 1



Answer (18)

0 votes

Algorithme   convert;

var  nbjrs,nbj,nbmois,nbsem,nbAn

:entier;

debut

ecrire('donnez le nombre de jours');

lire(nbjrs);

nbAn:=nbjrs div 365

nbmois:=(nbjrs moD 365)div 30

nbsem:=((nbjrs moD 365)moD 30)div7

nbj:=((nbjrs moD 365)moD 30)mod7

ecrire('jour':nbj,'semaine':nbsem,'mois':nbmois,'années':nbAn)

fin.

 

Gr 04

Answered on 17:47, Sunday 29 Oct 2017 by chourouk bouakaz (7 points)
In Algorithmique et structure de données 1



Answer (19)

0 votes

Algorithme    convert;

var    nbj,a,m,s,j:entier;

debut

ecrire('donnez le nombre de jours');

lire(nbj);

a:=nbj div 365

m:=(nbj mod 365)div 30

s:=((nbj mod 365)mod 30)div7

j:=((nbj mod 365)mod 30)mod7

ecrire(nbj '=' ,a, 'année est',m, 'moisest' ,s, 'semaine est' ,j, jour);

fin.

 

Gr 04

Answered on 18:07, Sunday 29 Oct 2017 by وفاء زروقي (8 points)
In Algorithmique et structure de données 1



Answer (20)

0 votes

algorithme convertit;

var nbj,a,m,s,j:entier;

debut

ecrire('donnez le nombre de jour');

lire(nbj);

a:= nbj div 365;

m:=(nbj mod 365) div30;

s:= ((nbj mod365)mod 30)div7;

j:=((nbj mod 365)mod 30) mod 7;

ecrire(nbj ,'=',a,'anne et',m,'mois et',s,'semaine et',j,'jour' );

fin.

groupe 3 kechaichia narimene    

Answered on 20:10, Sunday 29 Oct 2017 by narimene kechaichia (14 points)
In Algorithmique et structure de données 1



Answer (21)

0 votes

Algorithme temp;

Var nbjrs,A,M,S,J :entier ;

Debut 

ecrire ('donnez les nombres des jours');

Lire  (nbjrs);

A := nbjrs DIV 365 ;

M :=((nbjrs MOD 365)DIV 30);

S :=((nbjrs MOD 365)Mod 30)DIV 7 ;

J :=((nbjrs MOD 365)MOD 30)MOD 7);

ecrire  (nbjrs, '=' ,A, ' ans', M, '  moins, S, '  semaines' ,     J, '   jours' );

Fin.

Gr : 4

 

Answered on 21:31, Monday 30 Oct 2017 by Manel chiah (12 points)
In Algorithmique et structure de données 1



Answer (22)

0 votes

Algorithme  temps;

Var Ans, Mn, Smn,  jr, nj ;

Début 

Ecrire ('donnez les nbres de jr );

Lire (nj );

Ans := nj div 365 ;

Mn := ( nj mod 365) div 30 ;

Smn  := ( nj mod 30) div 7 ;

Jr  := njr mod 7 ;

Ecrire  ('année' ,ans,  'Mois' , Ms , 'Semaine' , Smn,  jr,  'Jours');

Fin. 

Answered on 22:05, Monday 30 Oct 2017 by Abir Bouzenada (12 points)
In Algorithmique et structure de données 1



Answer (23)

0 votes

Algorithme convert;

var nbj,a,m,s,j:entier;

début

écrire ('donnez les nombres des jours');

lire(nbj);

a:=nbj div 365;

m:=(nbj mod 365)div30; 

s:=((nbj mod 365) mod 30)div 7;

j:=((nbj mod 365) mod 30)mod 7;

écrire ( nbj,'=' ,a,'années et',m,'mois et' ,s,'semaines et' ,j, 'jours');

fin.

G3

Answered on 21:10, Tuesday 31 Oct 2017 by tourghi marwa (22 points)
In Algorithmique et structure de données 1



Answer (24)

0 votes

algorithme temp;

var nj,a,m,s,j:entier;

debut

écrire('donnez le nombre de jour',nj);

lire(nj);

a:=nj div 365

m:=(nj mod 365) div 30;

s:=(nj mod 30) div 7;

j:=nj mod 7

écrire(nj,'équivalent',a,'annés',m,'mois',s,'semaine',j,'jours');

fin.

Answered on 10:35, Wednesday 1 Nov 2017 by rayene ridane (228 points)
In Algorithmique et structure de données 1



Answer (25)

0 votes

algorithme temp;

var nj,a,m,s,j:entier;

debut

écrire('donnez le nombre de jour svp');

lire(nj);

a:=nj div 365;

m:=(njmod 365) div 30;

s:=(nj mod 30) div 7;

j:=nj mod 7;

écrire(nj,'équivalent',a,'annés',m,'mois',s,'semaine',j,'jours');

fin.

Answered on 18:18, Monday 6 Nov 2017 by Haifa Benlassowd (76 points)
In Algorithmique et structure de données 1



Answer (26)

0 votes

;Algorithme tamps

;Var p,ans,m,sem:entier

Debut

;('Ecrire('entrer les jours p:

;(Lire(p

;Ans:=p div 365

;m:=(p mod 365)div30

;Sem:=p mod 30

;(Ecrire(ans, m,sem

.Fin

Answered on 13:51, Friday 1 Dec 2017 by sara younsi (127 points)
In Algorithmique et structure de données 1



Answer (27)

0 votes

Algorithme  Temps ; 

Var NJ , A , M , S , J  : entier ; 

 

Debut 

Ecrire('donnez le nombre de jours svp '); 

Lire(NJ); 

A:=NJ div 365 ; 

M:=(NJ mod 365) div 30 ; 

S:=(NJ mod 30) div 7 ; 

J:=NJ mod 7 ; 

Ecrire( NJ , ' équivalent ' , A , 'ans' , M , 'mois' , S , 'semaine' , J , ' jours ' ) ; 

 

Fin. 

Answered on 17:55, Friday 8 Dec 2017 by nacer eddine ben nia (68 points)
In Algorithmique et structure de données 1



Answer (28)

0 votes

Algorithme date;

Var a,ans,m,sem,j:entier;

Debut

lire(a);

Ans:=a div 365;

m:=(a mod 365)div30;

Sem:=(a mod 30)mod 7;

j:=a mod 7;

Ecrire('la date est:',ans,'ans',m,'m',j,'j');

fin.

g3.

Answered on 19:37, Thursday 14 Dec 2017 by مراد صوايفية (12 points)
In Algorithmique et structure de données 1



Answer (29)

0 votes

Algorithme tamp;

Car nbj,a,m,t : entier;

Debut

Ecrire ('donnez les nombre des jeur');

Lire(nbj);

a:=nbj div 365;

m:=((nbj mod 365)mod 30) mod 7 ;

t:=((nbj mod 365)mod 30 )div 7;

Ecrire (nbj'=',a,'anne et',m,'mois et',s,semaine et ,'t',jour);

  • Fin.

Answered on 20:26, Thursday 14 Dec 2017 by أميرة زمال (84 points)
In Algorithmique et structure de données 1



Answer (30)

0 votes

Algorithme tamp;

Car nbj,a,m,t : entier;

Debut

Ecrire ('donnez les nombre des jeur');

Lire(nbj);

a:=nbj div 365;

m:=((nbj mod 365)mod 30) mod 7 ;

t:=((nbj mod 365)mod 30 )div 7;

Ecrire (nbj'=',a,'anne et',m,'mois et',s,semaine et ,'t',jour);

Fin.

Answered on 20:27, Thursday 14 Dec 2017 by أميرة زمال (84 points)
In Algorithmique et structure de données 1



Answer (31)

0 votes

Algorithme convert;

Var nbjrs,nbj,nbmois,nbsem,nban:entier;

Debut 

Ecrire ('lntroduisez le nombre de jours:');

Lire(nbjrs);

Nban:=nbjrs div 365;

Nbmois:=(nbjrs mod 365)div 30;

Nbsem:=((nbjrs mod 365)mod 30)div 7;

Nbj:=((nbjrs mod 365)mod 30 )mod 7;

Ercrire ('jours :',nbj,semaines:',nbsem,'mois:',nbmois,'années:',nban);

Fin.

Answered on 10:08, Tuesday 19 Dec 2017 by ويصال لعلايبية (11 points)
In Algorithmique et structure de données 1



Answer (32)

0 votes

Algorithme convertit;

var nb,a,m,s,j:entier;

debut

ècrire('donnez le nombre de jour: ');

lire(nb);

a:=nb div 365;

m:=(nb mod 365) div 30;

s:=((nb mod 365) mod 30) div 7;

j:=((nb mod 365) mod 30) mod 7;

ècrire(nb,'=',a,' Anne et ',m,' Mois et ',s,' Semaine et ',j,' Jour ');

fin.

Answered on 18:14, Tuesday 19 Dec 2017 by Cadi Mohamed riadh (14 points)
In Algorithmique et structure de données 1



Do you have an answer ?