Készítsünk programot, amely kiszámolja az első 100 drb. páros szám összegét (A ciklus vegyük egytől ötvenig majd a ciklusmagban vegyük a ciklusváltozó kétszeresét így megkapjuk a páros számokat Ezeket hasonlóan adjuk össze mint az első feladatban)?

milyen nyelven készítsük a programot?

és: " ciklus vegyük egytől ötvenig majd a ciklusmagban vegyük a ciklusváltozó kétszeresét így megkapjuk a páros számoka"... egytől 50ig is vannak páros számok nem inkább a (változó értéke+50)-el kéne számolnia cikluson belül?

http://www.gyakorikerdesek.hu/szamitastechnika__programozas_..

Azt hittem 2 kérdés közt egy órának el kell telnie.

Amúgy mi ebben a nehéz, 1-től százig (vagy ötvenig, értelmezéstől függően) elmész egy for ciklussal, megduplázod az adott számot (a ciklusváltozót) hogy a párosakat kapd meg, és egy változóhoz mindig hozzáadogatod ezeket. Ha elolvasod a füzetedben a jegyzetet, biztosan menni fog.

procedure TForm1.Button1Click(Sender: TObject);

const meddig=100;

begin

os:=0;

szam:=0;

for i:=1 to meddig do begin

szam:=szam+2;

os:=os+szam;

end;

showmessage(inttostr(os)); //végeredmény kiiratása

end;

-----------------------------------------------------

Delphis megoldás átírod majd amire akarod.

FreePascal-ban:

program P2;

var i,s:=integer;

begin

s:=0;

for i:=1 to 50 do begin

s:=s+2*i;

end;

writeln('Osszeg: ',s);

end.