Kezdőoldal » Számítástechnika » Programozás » Valaki segitene nekem ezt...

Valaki segitene nekem ezt megirni FreePascalba?

Figyelt kérdés

Készítsünk programot, amely kiszámolja az első 100 drb. páratlan szám összegét (A ciklus vegyük egytől ötvenig, majd a ciklusmagban vegyük a ciklusváltozó kétszeresét eggyel csökkentve - így megkapjuk a páratlan számokat.


nagyonmegköszönném.


2011. jan. 12. 15:34
 1/3 anonim ***** válasza:
Segítek: szedj le egy Hello Worldöt a netről, így már megvan egy programkereted. Aztán ebben a kiiratás helyére írj egy ciklust, ami elmegy 1-50, és írd ki a ciklusváltozó értékének a kétszeresét, csökkentve eggyel.
2011. jan. 12. 15:38
Hasznos számodra ez a válasz?
 2/3 A kérdező kommentje:
én ezt nemértem :/ nagyon bukta vagyok infóból..
2011. jan. 12. 15:39
 3/3 anonim ***** válasza:

Hát, az első 100 db. páratlan számhoz nem 50-ig kell számolni, hanem 100-ig. Így van megírva a progi is.


program osszeg;

uses crt;

var i,s:integer;

begin

s:=0; {inicializálás}

for i:=1 to 100 do s:=s+(2*i)-1;

clrscr;

writeln('Az első 100 páratlan szám összege: ',s);

repeat until keypressed;

end.

2011. jan. 12. 15:41
Hasznos számodra ez a válasz?

Kapcsolódó kérdések:




Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu

A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!