Zadanie v pascale

himak · Napísal **himak**: 18.05.2008 0:07

ahojte,

chcel by som poprosit daku dobru dusu ci by mi nevypracoval, alebo aspon nezacal moje zadanie........dost to suri. Ako obycajne nam ho dali za pat 12 a ja som velmi slaby v programovani

Moje zadanie:

Zostavte algoritmus a program, ktory spracuje dve ciselne polia A, B desiatich prvkov. Algoritmus vypocita sucet, rozdiel, sucin a podiel postupne kazdych i-tych prvkov a vysledky zapise na obrazovku do tabulky.

Velka vdaka

neznamy · Napísal **neznamy**: 18.05.2008 12:13

no myslim ze by to mohlo byt takto, aj ked neviem ako su zadavane cisla v poliach a a b(ja som ich dal nacitavat z klavesnice) a aky format ma mat ta vysledna tabulka... inak zadanie sa mi to zda naozaj jednoduche.. to by mal zvladnut kazdy

Kód:

program HIMak;
uses crt;
var a,b : array [1..10] of integer;
i,vysledok :integer ;
begin
clrscr;
writeln ('Zadaj prvky pola A');
for i:=1 to 10 do
  begin
    readln(a[i]);
  end;
writeln ('Zadaj prvky pola B');
for i:=1 to 10 do
  begin
    readln(b[i]);
  end;
writeln('sucet rozdiel sucin podiel');
for i:=1 to 10 do
  begin
    write(a[i]+b[i]:5);
    write(a[i]-b[i]:8);
    write(a[i]*b[i]:6);
    write(a[i]/b[i]:6:3);
    writeln;
  end;
readln;
end.

himak · Napísal autor témy **himak**: 18.05.2008 13:05

ahoj, velmi pekne ti dakujem....este pre ujasnenie

writeln('sucet rozdiel sucin podiel');
for i:=1 to 10 do
begin
write(a[i]+b[i]:5); \\ta :5 znamena co??
write(a[i]-b[i]:8);
write(a[i]*b[i]:6);
write(a[i]/b[i]:6:3);
writeln;
end;
readln;
end.

neutronmind · Napísal **neutronmind**: 18.05.2008 13:18

himak píše:

ahoj, velmi pekne ti dakujem....este pre ujasnenie

writeln('sucet rozdiel sucin podiel');
for i:=1 to 10 do
begin
write(a[i]+b[i]:5); \\ta :5 znamena co??
write(a[i]-b[i]:8);
write(a[i]*b[i]:6);
write(a[i]/b[i]:6:3);
writeln;
end;
readln;
end.

ta :5 znamena to, ze sa napise to cislo a pred nim bude pat medzier...
keby tam tie cisla neboli, vysledky by vyzerali asi takto

Kód:

1020304050

ak to tam das, tak tam budu tie medzery

Kód:

10 20 30 40,000

v poslednom mas :6:3, takze pred cislom bude 6 miest a za desatinnou ciarkou budu 3 miesta(40.000)... asi tak

himak · Napísal autor témy **himak**: 18.05.2008 13:34

O.K. diki myslel som si.......

este ak sa smiem spytat, kde ty studujes, alebo to uz mas za sebou? ci zo zaluby?

neutronmind · Napísal **neutronmind**: 18.05.2008 13:53

himak píše:

O.K. diki myslel som si.......

este ak sa smiem spytat, kde ty studujes, alebo to uz mas za sebou? ci zo zaluby?

kto, ja? hm no ja som na gympli, a v pascale robim skor zo zaluby... ale este som len zaciatocnik

Speeder21 · Napísal **Speeder21**: 18.05.2008 17:49

ty a v pascali zaciatocnik ?

no pekne tak ja tom potom amater jak hrom

:D:D:D inac pali ti to

ado21 · Napísal **ado21**: 30.09.2008 1:02

hm,

ja tiez nie som nic extra...

dsljohn · Napísal **dsljohn**: 04.10.2008 8:49

ahojte, nechce sa mi zakladatat nova tema lebo to je drobnosť chcem sa spitat že ci da sa v mascale napisať napr

Kód:

writeln(´x^2´);

alebo jednoduch index 2 na x ciže aby to bolo x na druhu

p360t · Napísal **p360t**: 04.10.2008 9:20

Ak myslíš vypočítanie druhej mocniny, to sa robí funkciou sqr(). Ak chceš len zobraziť ten znak "na druhú", tak to sa asi dať nebude (záleží od výstupného kódovania - ak je výstup len v ASCII - typicky na konzolu, tak tam taký znak neexistuje).

dsljohn · Napísal **dsljohn**: 04.10.2008 9:22

jj myslel som len zobraziť ten znak chcel som ten ^ znak nejak ale neviem ako sa da dať ale asi nijak podl tvojho prispevku

edit://
ten znak sa nachadza na klavesnici ak si zapnes anglicku klavesnicu a tam kde mas na slovenskej ž tak tam je aj ten znak^

stenley · Napísal **stenley**: 04.10.2008 10:10

preco by v ascii neexistoval ten znak? pozri si ascii tabulku a najdes ho tam (dec 94)

p360t · Napísal **p360t**: 04.10.2008 10:27

Jááááj ty si len tú striešku myslel?? Ja že ² Tá strieška je aj na slovenskej klávesnici (aspoň na windowsoch), stačí stlačiť pravý alt + číslo 3 (na alfanumerickej) a potom medzeru (keďže ten znak má v niektorých jazykoch podobnú funkciu ako u nás mäkčeň - veď napr. ô sa dá spraviť ako pravý alt + 3 a potom o). Pravý alt je ekvivalentný ľavému altu + ctrl.

dsljohn · Napísal **dsljohn**: 04.10.2008 10:34

no ano ja som myslel tu striesku alebo potom klacicky cislo a index hore ale ten sa neda

edit:///
teraz ma napadlo že vsak Pascal je DOSOVSKY program a samostatne dos nema take že index hore ci dole

neutronmind · Napísal **neutronmind**: 04.10.2008 16:29

Znak '^' je nieco ako dereferencny operator v C, pokial si spominam, takze sa pouziva pri pointeroch, cize to takto nepojde... Ak by si chcel vypocitat x^y, tak by si si len musel naprogramovat taku funkciu, pripadne pouzit spominanu funkciu sqrt() (ak y=2).

dsljohn · Napísal **dsljohn**: 04.10.2008 17:40

ja viem je to naprogravone sprane ja som len potreboval zapisať toto

Kód:

writeln (´Tvar kvadratickej rovnice ax^2+bx+c=0´);

ostatne co sa tyka vypoctov a vzorcov je SQR resp odmocnina SQRT

Zadanie v pascale

Podobné témy