Aidez moi svp petit prg pascal

Fermé
dreams S - 19 juin 2012 à 21:47
00lina00 Messages postés 29335 Date d'inscription lundi 1 décembre 2008 Statut Modérateur Dernière intervention 5 août 2023 - 19 juin 2012 à 21:52
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 29335 Date d'inscription lundi 1 décembre 2008 Statut Modérateur Dernière intervention 5 août 2023 1 100
19 juin 2012 à 21:52
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