Aidez moi svp petit prg pascal

Fermé
dreams S -  
00lina00 Messages postés 29453 Date d'inscription   Statut Modérateur Dernière intervention   -
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.

A voir également:

1 réponse

00lina00 Messages postés 29453 Date d'inscription   Statut Modérateur Dernière intervention   1 101
 
Bonjour,

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
0