Pagina de start a forumului Pascal2007.MyForum.ro Pascal2007.MyForum.ro
Acesta este un forum pentru cei care dau bacul la informatica - Varianta Pascal - Inregistreaza-te ca de nu o sa-ti para rau!!!
 
 
FAQ  •  Cautare   •  Membri  •   Grupuri  •  Inregistrare   •  Profil  •  Mesaje private   •  Autentificare

Varianta 3

 
Creaza un subiect nou   Raspunde la subiect    Pagina de start a forumului Pascal2007.MyForum.ro -> Subiectul 2
Subiectul anterior :: Subiectul urmator  
Autor Mesaj
sugarfree
Amator de rezolvari gratuite


Data inscrierii: 27/Feb/2007
Mesaje: 3
MesajTrimis: 04/03/2007 00:12    Titlul subiectului: Varianta 3 Raspunde cu citat (quote)
programul dat calculeaza suma numerelor din intervalul [m,n]

1. 49 (4+5+6+7+8+9+10=49)

2. n=15 si m=15 etc (suma nr din intervalul [m,n] trebuie sa fie 15)

3.citeste n,m
s<=0
repeta
s<-s+n
n<-n-1
pana cand n<m
scrie s

4. var s,n,m:integer;
begin
readln(n,m);
s:=0;
while n>=m do
begin
s:=s+n;
n:=n-1;
end;
scrie(s);
end.
Sus
Vezi profilul utilizatorului Trimite mesaj privat
Afiseaza mesajele pentru a le previzualiza:   
Creaza un subiect nou   Raspunde la subiect    Pagina de start a forumului Pascal2007.MyForum.ro -> Subiectul 2 Ora este GMT + 3 ore
Pagina 1 din 1

 
Mergi direct la:  
Nu puteti crea un subiect nou in acest forum
Nu puteti raspunde in subiectele acestui forum
Nu puteti modifica mesajele proprii din acest forum
Nu puteti sterge mesajele proprii din acest forum
Nu puteti vota in chestionarele din acest forum


theme par laborde40.com
Powered by phpBB © 2001, 2002 phpBB Group
Fa-ti si tu propriul forum GRATUIT, pe www.myforum.ro