Paskal

Радјард Куплунг
Eme ložiš da vam na takmičenju daju nacrtan algoritam za množenje deset brojeva

TESLARAC, VIMO SE U FINALU

http://i61.tinypic.com/k9c38l.jpg

Malo se programira, malo se drka

faktorijel ko faktorijel je lak da nemož biti lakši, samo provrtiš promenljivu kroz for petlju i pomnožiš je sa svakom vrednošću promenljive koja određuje petlju. A meni i dalje nije jasno šta se u ovom zadatku traži

platipusu, ovaj toalet papir na stolu ti sluzi kad se smoris malo od ucenja pa izdrkas, da se obrises?

Radjarde, tebra, ja imam na kont imam 5 zadataka, duplo teži brate lololo

(btw ovo nije moja soba, niti sam ja imao...za sta da koristim onu rolnu papira)

Kasno sam se setio da dodam, morao sam da editujem :D
Ali da, cuvam i jednu Pavlovicevu mast u fioci, posto me po nekada jednostavno mrzi da trosim energiju na pokrete ruku..

Malo se programira, malo se drka

Hahahhahahahahahah

Sejo_govedo
program p1;
var
n,s,i:integer ;
begin
writeln('uneti broj');
readln(n) ;
S:=0 ;
FOR i:=6 TO n DO
begin
S:=S+(i puta i puta i);
i:=i+2;
end;
writeln(s);
end;

Ne valja ti ovo, i:=i+2 sjeba petlju i ode sve u kurac.

ok, skapirao šta zadatak traži, lako je. Samo mi reci da li u paskalu beše možeš da napišeš npr. 2^2 ili nema integrisano stepenovanje? Pošto bi onda mogao da mu vrtiš da li je pozitivan ili negativan preko (-1)^n

postoji kod za kvadrat (sqr) (jeste li izvaliil kako zanimljivo izgleda kod za kvadratni koren: sqrt, gotovo da se cita kao skvirt..), ali ne znam ga za neki visi stepen

Program dgfdg;
var i,s,n,z:integer;
readln(n);
s:=1;
z:=1;
fori:=2 to 2*n do
begin
s:=s x z x i;
z:=-z;
i:=i+2;
end;
writeln(s);
end.

Hujo, zar to nije :

sqr(x) --- kvadrat
sqrt(x) ---- koren ?

bači pogled na edit, da ne objašnjavam opet

ovaj zadatak sa mnozenjem ovako nekako:

edit: ne valja, nisam lepo procitao zadatak, onako je kako sejo napisao.

Ne valja ti ovo, i:=i+2 sjeba petlju i ode sve u kurac.

Јеси испробао? Ја мисли мда не би требало...

Program dgfdg;
var i,s,n,z:integer;
readln(n);
s:=1;
z:=1;
fori:=2 to 2*n do
begin
s:=s x z x i;
z:=-z;
i:=i+2;
end;
writeln(s);
end.

Hvala. Po milijarditi put.
I izvinite sto vas maltretiram.

Јел ради овај и онај прошли???

opušteno

jel vi trolujete, leba vam?

A daj Atife, šta ti je bre, ovo je bre zajebancija još dok smo u srednjoj

Ја сад радим делфи, то ти је вижуал Паскал, иста синтакса, а це иначе вјежба, тако да имам нешто логике :)

pa ja citam sve neki takmicari, ne znate stepen minus keca da odradite. mislim, tebra...

pa ja se ne takmičim :D
ja u glavi ovo sve radim lolol
imam 4 i bole me piša

Чекајте да вам дођу рекурзивне процедуре, једнодимензионални, дводимензионални низови, слогови са датотекама.. :)

Класе ниси радио? :)

Ma to ja ne mogu da zadržim pažnju na časovima, pa se posle mučim...hvala mnogo, razjasnili ste mi ovo sve i sutra bih mogao čak i 5 da dobijem, što bi označilo novu eru u mom životu: eru gde ću imati 5 iz informatike, pošto ću dučim redovno od sad (hehe, kao i uvek što učim redovno).
Hval još jednom draga gospodo, daću sve od sebe da vaš trud ne bude uzaludan, a sada bih otišao da spavam, i onako sam bolestan a sutra treba da predajem lekciju o Napoleonu iz istorije, mada mi glas zvuči kao motorna testera.

https://fbcdn-sphotos-f-a.akamaihd.net/hphotos-ak-ash3/t1/935873_610921815622946_1210221414_n.jpg

Код мене у школи се у трећем ради це па це++ и класе скоро цијело друго полугодиште. Сад у четвртом делфи који нема класе, тако да мислим да се мало пажње даје ОО програмирању.