Pocetnik u Paskalu i pocetnika pitanja

Pocetnik u Paskalu i pocetnika pitanja 21.05.2008. u 14:35 · pre 224 meseca #1

Zdravo
Ucim Paskla ,a volim da ucim malo i uz pomoc logike
Imam uradjen zadatak:Upisati broj meseca koji ce pokazati ime tog meseca i broj dana.
evo ga dole

Code:

program Meseci;
{$APPTYPE CONSOLE}
uses
  SysUtils;

const
mesec:array[1..12] of String[10] = ('Januar', 'Februar','Mart','April','Maj','Juni','Juli',
'Avgust','Septembar','Oktobar','Novembar','Decembar');
dana:array[1..12] of integer = (31,28,31,30,31,30,31,31,30,31,30,31);
var
brojmeseca:integer;
begin
writeln('Molim upisite broj meseca: ') ;
readln(brojmeseca);
writeln;
if brojmeseca<=12 then
   writeln (mesec[brojmeseca],' ima ',dana[brojmeseca],' dana.')

   else
   writeln('nepostoji neki trinesti ili n-ti mesec');
   readln;
   end.

Ono sto me zanima jeste sledece
1.Zasto u konstantama posle Array mora da sledi [1..12].Te dve tacke,ako stavim tri ili bilo kolko sem dve tacke nece da radi,pravi gresku[..].
2.Zasto u konstantama u zagradama('Januara',itd) ,nije isto i sa brojevima ('31','28',itd),nego(31,28 itd)?

Ako nije problem dajte neki slican zadatak da probam da resim,a mozete odmah priloziti i resen zadatak ili vise njih.
Pozdrav

Re: Pocetnik u Paskalu i pocetnika pitanja 21.05.2008. u 15:36 · pre 224 meseca #2

> 1.Zasto u konstantama posle Array mora da sledi [1..12].Te dve tacke,ako stavim tri ili bilo kolko sem dve tacke nece da radi,pravi gresku[..].

Takva je sintaksa za deklaraciju nizova, IndeksPocetnogElementa..IndeksPoslednjegElementa.

> 2.Zasto u konstantama u zagradama('Januara',itd) ,nije isto i sa brojevima ('31','28',itd),nego(31,28 itd)?

Pascal je strogo tipiziran jezik, svaki tip podatka se mora pisati u skladu sa njegovim svojstvima, ako su stringovi koriste se navodnici ('Jan', 'Feb'), celobrojni tipovi (brojevi) se pišu bez dodataka (1, 2, 3), realni brojevi se pišu sa tačkom kao decimalnim separatorom (1.3, 2.5, 5.6)...

> Ako nije problem dajte neki slican zadatak da probam da resim,a mozete odmah priloziti i resen zadatak ili vise njih.

Pre nekoliko meseci su postovani tekstovi zadataka sa takmičenja iz Informatike za osnovnu školu, to ti može biti interesantno. Takođe, otkucaj na googlu "zadaci iz paskala" i dobićeš nekoliko linkova pa kreni odatle.

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Re: Pocetnik u Paskalu i pocetnika pitanja 22.05.2008. u 12:06 · pre 224 meseca #3

Hvala,nesto sam skinuo,a nesto radim i po knjizi
Imam jedan problemcic ,kako da odradim zaglavlja,ne razumem zadatak.

Kako da napisem program za prikazivanje kvadrata svoh celih brojeva izmedju 1 i 12 u dve kolone ,sa zaglavljima 'broj' i 'kvadrat'???
Ima li resenje,tj programcic.
Zadatak je iz knjige o paskalu ,deo ponavljanje

Kako da ga uradim?
Radi se sa for,nemam cak ni ideju.
pozdrav

Re: Pocetnik u Paskalu i pocetnika pitanja 22.05.2008. u 13:10 · pre 224 meseca #4

> Kako da napisem program za prikazivanje kvadrata svoh celih brojeva izmedju 1 i 12 u dve kolone ,sa zaglavljima 'broj' i 'kvadrat'???
> Ima li resenje,tj programcic.

Za ispis teksta koristi WriteLn, npr. WriteLn('broj kvadrat');
Za ispis broja i kvadrata, možeš koristiti Format funkciju, pogledaj u helpu (ili potraži ranije poruke) kako se može dobiti rezultat fiksne dužine.

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Re: Pocetnik u Paskalu i pocetnika pitanja 23.05.2008. u 13:16 · pre 224 meseca #5

hmmmm
u knizi jos nisam dosao do funkcija ,a vec daju zadatke sa funkcijama.Funkcije radim tek posle nizova,jos nisam stigao ni do petlji while i repeat.
uhhhhh

Re: Pocetnik u Paskalu i pocetnika pitanja 23.05.2008. u 13:30 · pre 224 meseca #6

hmmmm
u knizi jos nisam dosao do funkcija ,a vec daju zadatke sa funkcijama.Funkcije radim tek posle nizova,jos nisam stigao ni do petlji while i repeat.
uhhhhh

Re: Pocetnik u Paskalu i pocetnika pitanja 24.05.2008. u 16:33 · pre 224 meseca #7

Code:

program nesto;
var
  i : Integer;
begin
  for i := 1 to 12 do Writeln (i, ' ', i * i);
  readln;
end.

Forum kao aplikacija na telefonu

Srodne teme