Bonjour,
Je cale actuellement sur un exo qui me demande d'éditer la table de multiplication de 0 à 3 par n nombres compris entre deux limites que l'utilisateur choisira. Je dois pour cet exercice n'utiliser que l'addition. Quelqu'un pourrait-il m'aider SVP ?
J'ai essayé ce petit programme pour pouvoir continuer l'exercice mais les valeurs sont exactes, au lieu de m'afficher 3x5=15 il affiche "2x5=15".
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 program tablemult2; var i,j,lim1,lim2,prdt, k: integer; begin writeln('Entrez les limites:'); readln(lim1,lim2); prdt:=0; i:=lim1; j:=5; repeat for k:=1 to i do begin prdt:=prdt+j; writeln(i,'x',j,'=',prdt); end; inc(i,1); until i=lim2; readln; end.
Partager