Hogyan kell megírni ezt a programot?
Készítsünk programot, amely kiszámolja az első 100 drb. páratlan szám összegét (A ciklus vegyük egytől százig, majd a ciklusmagban vegyük a ciklusváltozó kétszeresét eggyel csökkentve - így megkapjuk a páratlan számokat. Ezeket hasonlóan adjuk össze, mint az első feladatban).
-------------------------------------------------
Már egy dél napja agyalok,de csak eddig jutottam:
program for07;
var i,osszeg:integer;
begin
osszeg:=0;
for i:=1 to 100 do
válasza:Oda van írva, hogy mit kell csinálni...
Osszeg:=osszeg+((i*2)-1);
válasza: válasza:Nem elég 50-ig futtatni a ciklust, mert akkor az első 50 páratlan szám összege lesz.
A 10.000 jó, ha megnézed, az első páratlan szám az 1, a századik 199, az összegük pedig 200. Ugyanígy 3 + 197 = 200, 5 + 195 = 200 ... tehát az összegük 50*200, ami 10.000.
válasza:program for07;
var i,osszeg:integer;
begin
osszeg:=0;
for i:=1 to 100 do
osszeg := osszeg + i*2-1;
writeln(osszeg);
end.
válasza:
válasza:Erre van egy masik megoldas is...
Veszed a szamokat egytol 100-ig vizsgalod hogy paratlan-e ha igen akkor adod az osszeg valtozohoz...
program feladat;
uses crt;
var osszeg,i : integer;
begin
clrscr;
osszeg:=0;
for i:=1 to 100 do
if(i mod 2 = 1) then osszeg+=i;
writeln('1 - 100-ig a paratlan szamok osszege: ',osszeg);
readln;
end.
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
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!