Obsah fóra
PravidláRegistrovaťPrihlásenie




Odpovedať na tému [ Príspevkov: 3 ] 
AutorSpráva
Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 02.04.07
Prihlásený: 04.10.07
Príspevky: 9
Témy: 3
Príspevok NapísalOffline : 02.04.2007 12:09

Tak na zaciatok-pascal mi nic nehovori a musime spravit nejaky program a co som cital tu temy,tak je tu vela ludi,co sa tomu rozumie,tak by ste mi mohli pomoct.
Program by mal zniet asi takto:Je to program,ktory najprv precita mesiac a den v mesiaci a pre dane hodnoty vypise pocet dni,ktore ubehli od zaciatku roka(do uvahy sa neberie priestupny rok)
Diiik :rolleyes:


Offline

Čestný člen
Čestný člen
Pomoc s prikladom

Registrovaný: 09.05.05
Prihlásený: 07.12.16
Príspevky: 1294
Témy: 69
Bydlisko: - - -
Príspevok NapísalOffline : 02.04.2007 13:53

Ahoj

Kód:
program dni;
uses crt;
var mesiace: array [1..12] of integer;
    i,den,mesiac,pocet: integer;

begin
clrscr;

mesiace[1]:=31;
mesiace[2]:=28;
mesiace[3]:=31;
mesiace[4]:=30;
mesiace[5]:=31;
mesiace[6]:=30;
mesiace[7]:=31;
mesiace[8]:=31;
mesiace[9]:=30;
mesiace[10]:=31;
mesiace[11]:=30;
mesiace[12]:=31;

write('Ktory je mesiac ?: '); readln(mesiac);
write('Kolkeho je dneska ?: '); readln(den);

if mesiac>1 then
   for i:=1 to (mesiac-1) do pocet:=pocet+mesiace[i];

pocet:=pocet+den;
writeln('Od 1.1. ubehlo ',pocet,' dni');
readkey;
end.


Vystup píše:
Ktory je mesiac ?: 4
Kolkeho je dneska ?: 28
Od 1.1. ubehlo 118 dni


Tak ?


Offline

Užívateľ
Užívateľ
Obrázok užívateľa

Registrovaný: 02.04.07
Prihlásený: 04.10.07
Príspevky: 9
Témy: 3
Príspevok Napísal autor témyOffline : 04.04.2007 10:08

JAsneeeee MOc si mi pomohol:)
DAKUJEM :)


Odpovedať na tému [ Príspevkov: 3 ] 


Podobné témy

 Témy  Odpovede  Zobrazenia  Posledný príspevok 
V tomto fóre nie sú ďalšie neprečítané témy. Pomoc s prikladom z M

v Vzdelanie, štúdium, škola

7

897

13.05.2008 16:58

pepek.namornik Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. pomoc s jednym prikladom v pascale

v Assembler, C, C++, Pascal, Java

10

818

18.03.2007 13:22

audiotrack Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. pomoc s jednym prikladom v Pascale(grafika)

v Assembler, C, C++, Pascal, Java

3

662

27.03.2007 22:37

audiotrack Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. help s príkladom

v Assembler, C, C++, Pascal, Java

8

789

13.03.2007 17:45

radiatorr Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. pomoc pomoc prosim nefunguje internet

v Ovládače

7

1109

09.09.2017 20:37

Smith Wesson Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Pomoc pri pomoc pri skladaní PC - od 1 500 do 1 800 Eur (rozlíšenie 1440p)

v PC zostavy

13

778

28.09.2023 20:23

johny314 Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Pomoc?

v HTML, XHTML, XML, CSS

1

541

09.08.2017 20:01

BX Zobrazenie posledných príspevkov

Táto téma je zamknutá, nemôžete posielať nové príspevky alebo odpovedať na staršie. pomoc

v Počítačové hry

5

488

28.06.2011 16:32

Ďuri Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Pomoc

v Operačné systémy Microsoft

3

625

29.12.2007 18:42

Dzimbo Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. pomoc

v JavaScript, VBScript, Ajax

2

874

15.05.2009 20:15

firewall Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. pomoc

v ATI/AMD grafické karty

3

696

04.03.2008 15:00

Mir Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Pomoc

v Zvuk

2

833

24.11.2007 17:30

optyx Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. POMOC

[ Choď na stránku:Choď na stránku: 1, 2 ]

v Ostatné

30

2259

27.09.2009 20:01

workoholik16 Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. pomoc

v PHP, ASP

2

783

02.02.2008 17:17

Punker661 Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. pomoc

v Ostatné

13

949

08.08.2009 22:16

malcolm Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. pomoc

v PHP, ASP

6

708

01.08.2008 16:27

Darkeye18 Zobrazenie posledných príspevkov


Nemôžete zakladať nové témy v tomto fóre
Nemôžete odpovedať na témy v tomto fóre
Nemôžete upravovať svoje príspevky v tomto fóre
Nemôžete mazať svoje príspevky v tomto fóre

Skočiť na:  

Powered by phpBB Jarvis © 2005 - 2024 PCforum, webhosting by WebSupport, secured by GeoTrust, edited by JanoF
Ako väčšina webových stránok aj my používame cookies. Zotrvaním na webovej stránke súhlasíte, že ich môžeme používať.
Všeobecné podmienky, spracovanie osobných údajov a pravidlá fóra