VPrijavaPrijavi se

Paskal

Arhiva110 odgovora· poslednji 14. feb 2014.
PD

Kao što verovatno znate, u srednjim školama se obrađuje Paskal. Da, katastrofa jebena.
Enivej, ja imam test sutra i nemam blage veze. Radimo FOR naredbu.
Daklem, zamolio bih vas ako možete da mi napišete kako se piše sledeći zadatak(algoritam ne mora):
Sa tastature se učitava n prirodnih brojeva. Napisati program koji izračunava proizvod njihovih recipročnih vrednosti. Znam kako treba da izgleda zadatak, ali ne umem da ga postavim lepo.

PD

E, ovako ide 2. zadatak: Zbir trećih stepena svih parnih brojeva od 6 do n.
Sada, meni program ide ovako:
program p1;
var
n,s,i,a:integer
begin
writeln('uneti broj');
readln(n)
S=0
FOR i:=6 to n do
begin
IF amod2=0, THEN i sad me ovo jebe. Ne mogu da izvalim kako da napravim da mu stavi 3. stepen i kako da se uzdize bez vijagre...
Posle toga ide ono klasicno...

I moj brat planira programiranje.
Da sam znao ranije za onaj sajt, imao bih možda 5 a ne 4 na polugođu...

SG

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;

PD

Ali treba zbir svih parnih brojeva, zaboravio si da iskoristiš a. Šta znači * pored 2. i?
EDIT: ahaaaaa, pa mene je to zbunilo :D

SG

То је сад школско. Прошле године сам закаснио на пола, а ове ако Бога да пуцам на високо :)

ЏЕ

Peri, jel vam traže algoritme uz to? Mnogo je lakše da se radi uz algoritam

Hujo, kod mene se već treća etapa sutra održava lololo ali dobro, to je školsko

SG

Не знам, ја сам из Бања Луке. Општинско буде средином марта ја мислим...

PD
Peri, jel vam traže algoritme uz to? Mnogo je lakše da se radi uz algoritam

Traži, ali mi je bilo glupo da tražim od vas da mi crtate još i algoritam :D izvaljujem kako da napravim algoritam iz programa i kako program iz algoritma, samo osmišljavanje onog dela sa sumom ili proizvodom mi je jedini problem..

ЏЕ

Kod mene jedan lik iz prve godine vodi za 100 poena trećacima i četvrtacima lololo
on ima 200 svi ovi po 90 otprilike :D

SG

Пери позабави се мало на оној страници што сам поставио, ту су неки најосновнији типови задатака а имаш и алгоритме чини ми се, ја их никада нисам радио :)
Када ти тражи суму почетну вриједност постављаш на нулу и у фор петљи је облк с:=с+израз, а ко је производ почетну вриједност постављаш на кеца и у фор петљи је с:=с*(израз)...једноставно :)

ЏЕ

Meni je mnogo nezgodno bez algoritma kad radim :)

Msm, nije toliko nezgodno, ali umem da preskočim neki korak onda lololo

SG

Ту дабл не пије воду?
Едит: Знам да треба преко стрингова, али никако да то провалим. То ме је увијек јебало на з-тренингу. Ако би био срце да урадиш :)

CE

u, kako da ne :)
vezbaj, mozes da napavis neki svoj format proizvoljne tacnosti, recimo...

SG

Ала си шкрт :)
Покушавао сам пар пута нешто са претварањем у стринг и враћањем, очигледно није ишло. Не знам зашто никада нисам питао професора...

ВЕ

ja bih napravio niz cifara, redefinisao mnozenje kao operaciju nad clanovima niza i to bi sljakalo. Dodatna optimizacija je da ti cifre budu binarne, pa onda odjebes sve ove dvojke i to uzmes kao siftove, a redefinises mnozenje nad clanovima bin niza.

SG

Мени пролази корз главу идеја да се претвара у хексадецимални или да се помјера децимална тачка. Нпр да од 100 направиш 0.00001 (колико већ систем дозвољава, код мене је 32-битни).
Па бих имао 0.00001 х 0.00000998 х 0.00000996...или плус да се направи низ Х[10] који би купио прозвод након сваке стотке и на крају се измноже и избаци тачка.
Ај бар реци Келте јесмо на добром путу?

KE

Коме треба нешто из оета, могу да покушам да помогнем, сутра имам испит.

Uzgred, ako tebi treba nešto iz oeta viči.
Uzgred Mlatoni, ja ne vidim ni neki problem da se krene od C-a. Jest' da ima više mogućnosti od Pascala, ali uz dozitanje toga štanse radi, može sasvim pristojno da uvede čoveka u programoranje. Mada Pascal je dobar, je krajnje logična sintaksa i prilično je lagan za učenje, tako da je verovatno najlakši za sticanje programerske logike.

Peri, nije ti poenta Pascala u srednjoj da postaneš programer, više je poenta da naučiš da razmišljaš koliko toliko i na taj način. Od problema do realizacije i te munje.

KE
Hahaha, vid ga ovaj sa etfa. Muči jado i uči oet, pogotovu ako ti je loš kolokvijum.

12.5, свакако није сјајан, ал шта ћу :D

mislim, rešićeš, ali će ti trebati vremena i vremena

KE

У суштини, мени је скоро све јасно у теорији (за разлику од статике), само што се често сјебем у решавању, рачун или тако нешто. Ваљда ће да буде добро.

SG

Данас било ово школско из програмирања, други сам, требало је боље. Нису прошла 2 тест примјера, сјебо се око преступних година када је датум прије 29, све у свему није било тешко, није ни тај, ал' ето...86 бодова. Ај гимназијалци да размјењујемо задатке :)

Tema je u Arhivi i zaključana je, tu se više ne odgovara.