La Meilleure Collection d'exercices Turbo Pascal -Sujet renouvelable

Ecrire un programme Pascal qui permet de remplir un tableau T par n entiers (2 < n < 20) puis d'afficher les éléments d'un deuxième tableau M rempli de la manière suivante :

Si k=1 ou k=n alors M[k]=T[k]
sinon M[k]= (T[k-1] + T[k+1]) /2

L'entier 36 a la propriété d'être divisible par la somme de ses chiffres, en effet 3+6 = 9 divise 36.

On se propose d'écrire un programme Pascal qui cherche et affiche tous les entiers naturels d'un intervalle [a, b] donné, (5 < a < b < 200) ; ayant cette propriété

****

On se propose de chercher parmi les entiers de l’intervalle [2 , 9] celui qui admet le plus grand multiple inférieur ou égal à un entier donné N (20 < N < 50).

Écrire un programme Pascal permettant de chercher puis d’afficher cet entier ainsi que son multiple.

Exemple:
Pour N=49 le plus grand multiple des entiers de l’intervalle [2 , 9] est l’entier 49 qui est un multiple de 7.
Dans ce cas les valeurs 7 et 49 seront affichées.
N.B :
1- Le candidat doit traiter les cas ex æquo = le cas où il y a plusieurs entiers admettant le plus grand multiple

Ecrire un Programme pascal permettant d'afficher tous les couples d'entiers naturels (m , n) vérifiant la propriété suivante :
m de [1, 100] et n de [2, 15]
et m figure dans l'écriture du produit m. n

Exemples :
1) Si m = 20 et n = 6
alors le produit m.n = 120 contient le nombre 20 dans ce cas le couple (20,6) sera affiché.
2) Si m = 20 et n = 12
alors le produit m.n = 20 * 12 = 240 ne contient pas le nombre 20

On veut écrire un programme en Pascal permettant d’afficher tous les entiers naturels formés de quatre chiffres dont la somme donnera un entier d’un seul chiffre.
Exemple:
La somme des chiffres de l’entier 2004 est égale à 6 (2+0+0+4=6) et par conséquent l’entier 2004 sera affiché

Histogramme !

On se propose d’afficher un histogramme à l’aide des lettres A, B et C comme celui de l’exemple ci-dessous.
Écrire un programme Pascal qui saisit le nombre de A, le nombre de B et le nombre de C puis affiche l’histogramme correspondant. Les nombres sont des entiers naturels inférieurs ou égaux à 15.
Exemple d'exécution:
Entrer trois nombres entiers compris entre 0 et 15: 6, 9, 3

B
B
B
A B
A B
A B
A B C
A B C
A B C

Football

Écrire un programme Pascal qui permet de saisir les résultats de (N-1) matchs de football d'une équipe et d'afficher le nombre de matchs gagnés, nuls et perdus ainsi que le nombre de points correspondants.
N est un entier tel que 10 < N <14.
Le nombre de points attribués est de trois pour un match gagné, un pour un match nul et zéro pour un match perdu

Ecrire un programme Pascal qui permet de chercher puis d'afficher tous les entiers naturels de l'intervalle [1000, 2000] qui vérifient la propriété suivante :
La somme des chiffres des unités et des dizaines est égale au produit du chiffre des centaines par celui des milliers.

Exemple :
L’entier 1954 sera affiché car 4 + 5 = 9*1

Fréquences

On dispose de deux tableaux T1 et T2 contenant respectivement n éléments (5 < n < 20). Les éléments de T1 sont des entiers naturels différents deux à deux et ceux de T2 sont des entiers naturels représentant des fréquences de façon que T2[i] est la fréquence de T1[i].
On se propose d’écrire un programme Pascal qui permet de saisir les éléments de T1 et de T2 puis d’afficher les éléments de T1 qui ont une fréquence supérieure ou égale à 10

Écrire un programme Pascal qui permet de saisir un entier n tel-que (100 < n < 10000) et de déterminer et d’afficher tous ses chiffres qui le divisent.

Exemple:
Si N = 2376 alors les chiffres 2, 3 et 6 seront affichés

Ecrire un programme Pascal qui permet d’afficher tous les entiers de l’intervalle [10000, 20000] tel que le chiffre du milieu est égal à la somme des autres chiffres.
Exemple:
12942 sera affiché car: 1+2+4+2=9

Poids d'un mot

On appelle poids d’un mot la somme des produits de la position de chaque voyelle contenue dans le mot par son rang dans l’alphabet français.

Une lettre a le même rang qu’elle soit écrite en majuscule ou en minuscule.

Écrire un programme Pascal qui calcule et affiche le poids d’un mot donné.

Exemple:
Le mot «Epreuve» a pour poids 165 car : (1*5) + (4*5) + (5*21) + (7*5) = 165