Aidez moi svp petit prg pascal
Fermé
Bonjour,
s'il vous plait je veux seulement savoir le role du programme suivant
program ex;
var N,S: integer ;
begin
read(N);
s:=0;
for A=1 to N do
if a mod 2 <> 0 s:=s+A*A else s:= s-A*A;
write (s);
end.
s'il vous plait je veux seulement savoir le role du programme suivant
program ex;
var N,S: integer ;
begin
read(N);
s:=0;
for A=1 to N do
if a mod 2 <> 0 s:=s+A*A else s:= s-A*A;
write (s);
end.
1 réponse
-
ModérateurBonjour,
Il est inutile de créer plusieurs discussions sur le même sujet, ceci pour le bon fonctionnement du forum et le respect des bénévoles qui aident.
Vous allez rester sur celle-ci : https://forums.commentcamarche.net/forum/affich-25417235-role-prg-pascal
et attendre patiemment qu'un bénévole vienne.
Nous ne sommes pas connectés 24h/24 ;)
Merci.
00lina00 Modératrice CCM
