Posez votre question Signaler

Program Pascal [Fermé]

Virtuaklem 171Messages postés 4 mars 2002Date d'inscription - Dernière réponse le 11 mars 2009 à 17:27
j'aimerais savoir comment on fait une racine carré en language Pascal
Lire la suite 

Program Pascal »

Suggestions
19 réponses
Réponse
+12
moins plus
programme calcul;
uses crt;
var x,x2:integer;
begin
clrscr;
write('donner la valeure de x');
read(x);
x2:x*x;
write('la racine carré de x est: ',x2);
readkey;
end.

Réponse
+6
moins plus
salut svp aidè moi a faire ce programme

un nombre parfait est nombre ègal a la somme de ses diviseurs propres y compris 1 mais luis meme exclu
exemple: 6 et 28 sont parfaits:
6=1+2+3
28=1+2+4+7+14
_ecrir un programme pascal qui lit un entier NBRet affiche s'il est parfait ou pas
_modifier ce programme de telle sorte qui affiche les N premiers nombres parfaits

MERCI

Bobinours- 11 janv. 2008 à 23:14
Facile !!

Tu vérifies si l'entier est parfait ensuite tu fais une boucle qui vérifie si les entiers sont parfaits :)
hedizidane - 26 nov. 2008 à 10:57
slt voila le programme:

program Parfait;
uses wincrt;
var n,i,s:integer;
begin
writeln('entrer un nombre');
readln(n);
s:=0;
for i:=1 to (n-1) do
if n mod i=0 then s:=s+i;
if (s=i) then writeln('le nombre est parfait');
else writeln('le nombre n est pas parfait');
end.

bye bye moi kamel
chouchou18 - 11 janv. 2009 à 17:34
slt pliz donne moi la solution de 2eme partie d'exercice( de programme): ( madifier ce programme de telle sorte qu'il affiche les N premiers nombres parfaits)
Réponse
+5
moins plus
Salut. Je ne connais pas le Pascal. Je prends Google.fr, je tape "racine carre pascal" + Recherche !

...

et voila :

... Il faut utiliser : Sqrt(nombre);

http://www.cybwarrior.com/langages/pascal/chap15.php

-= Bobinours =-
rhayem - 19 nov. 2007 à 19:18
Bonjour, mon amie c est rhayem
voila le racine caree d'un entier

program rhayem ;
uses wincrt ;
var
x:=integer;
r:=integer;

function racine_carre(x:integer):integer;
begin
repeat
read (x);
until x>0;
r:=SQR(x);
end;
iyuo - 18 mai 2008 à 18:05
r:=sqrt(x);
racin_carre:=r;
end;
Réponse
+5
moins plus
slt mon ami
pour faire une racine carré voila ts le program
program Mehdi;
uses wincrt(sur pascal 1.5) crt (sur pascal 7);
var
s,x:intger;

begin
write('saisir un entier');read(x);
S:=sqrt(x);
write(s);
end.
@ + friend :)

BAMI NDJAYOU LUDOVIC - 25 mai 2006 à 15:01
Salut je voudrais savoir si en pascal la fontion sqrt sapplique au entier naturel tel que déclaré par MEHDi-do. il déclare dans son programme :' var s,x : integer;' est ce compilable sachant que la racine d'un nombre admettant une racine est réel. Ceci pour dire que 's' aurait au mois été déclaré comme réel. Ceci dit dont, je me demande bien si 'x' ne pourait pas être déclarer comme réel bien qu'il soit explicitement réel ?
eclips15 - 9 mai 2008 à 21:27
oui je suis tout a fait d'accord avec toi car's' le declarer par mehdi est le resultat de lacine carrée de x sachant que x est un entier.
donc le resultat c-à-d s peut etre un chiffre avec vegule donc pas un entier mais c'est un reel par exemple la racine carree de 6 egale a 2.4 alors...
donc il faut declarer s comme reel
Réponse
+5
moins plus
cé SQRT

Réponse
+5
moins plus
slt pliz donne moi la solution de la 2eme question de l'exercice (modifier ce programme de telle sorte qu'il affiche les N premiers nombres parfaits)

Réponse
+4
moins plus
va sur site delphi de michel si tu me contacte je te le donnerai je te le fait si tu veux

bye

Juli1_29- 23 déc. 2006 à 12:25
Bonjour !
Je dois effectuer une programmation en langage pascal d'une calculette et j'aimerais savoir si tu pourrais m'aider !
Je te remercie de ta réponse !
Réponse
+3
moins plus
slt svp aidez moi à faire les operations(toutes les operations) sur les matrices en pascal.
merci

Alain - 18 mai 2008 à 18:20
Salut,

Regarde la FAQ Matrices
Réponse
+3
moins plus
salu je sius sofienne

Réponse
+3
moins plus
racine carrée =sqrr

Ce document intitulé « Program Pascal » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?