[ Príspevkov: 2 ] 
AutorSpráva
Offline

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

Registrovaný: 08.02.07
Prihlásený: 24.01.09
Príspevky: 2634
Témy: 69 | 69
NapísalOffline : 15.03.2008 11:35 | Priklad

Nevedel by niekto pomoct s prikladom v pascale?
Je to k projektu co som pisal v diskusii, takze nieje to pre mna, je to pre moju znamu, na gymnaziu ktora sa do toho vobec nerozumie. Velmi by som Vas poprosil, su tu 4 "temy" ktore treba urobit, vlemi by som Vam bol vdacny.

Temy: · 05_01: Priemer z n hodnot
· 05_02: hra kameň, papier, nožnice.
· 05_03: Tabelacia funkcie y=x^2+4x+1
· 05_04: Vymena mena a priezviska / 05_04.in


Offline

Užívateľ
Užívateľ
Priklad

Registrovaný: 01.02.08
Prihlásený: 10.04.15
Príspevky: 31
Témy: 11 | 11
NapísalOffline : 17.03.2008 16:27 | Priklad

1:

uses crt;
var hod,vys,suc:real;
op,n:integer;
begin
writeln('Zadaj pocet cisel');
readln(n);
suc:=0;
for op:=1 to n do begin
clrscr;
writeln('Zadaj hodnotu');
readln(hod);
suc:=suc+hod;
end;
clrscr;
vys:=suc/n;
writeln('Priemer je ',vys:6:2);
readln;
end.


2:

uses crt;
var na,vol:integer;
begin
randomize;
repeat
repeat
clrscr;
writeln('Co zvolis?');
writeln('1. Kamen');
writeln('2. Papier');
writeln('3. Noznice');
readln(vol);
until((vol<4)and(vol>0));
{1=kamen
2=papier
3=noznice}
case vol of
1:begin{kamen}
na:=random(3)+1;
if na=1 then writeln('Kamen, nerozhodne');
if na=2 then writeln('Papier, prehral si');
if na=3 then writeln('Noznice, vyhral si');
end;
2:begin{papier}
na:=random(3)+1;
if na=1 then writeln('Kamen, vyhral si');
if na=2 then writeln('Papier, nerozhodne');
if na=3 then writeln('Noznice, prehral si');
end;
3:begin{noznice}
na:=random(3)+1;
if na=1 then writeln('Kamen, prehral si');
if na=2 then writeln('Papier, vyhral si');
if na=3 then writeln('Noznice, nerozhodne');
end;
end;
writeln('Znova?');
repeat
writeln('1 ano');
writeln('2 nie');
readln(vol)
until((vol<3)and(vol>0));
until vol=2;
end.

3: čo je tabelacia?
4: ako to mysíš?


 [ Príspevkov: 2 ] 


Priklad



Podobné témy

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

Príklad

v PHP, ASP

22

891

08.11.2007 15:33

pitrik1

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

Príklad

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

v Vzdelanie, štúdium, škola

50

2546

20.11.2007 16:28

nZL

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

Java Príklad

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

9

410

21.04.2012 15:51

nBXXL

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

Delphi - príklad

v Delphi, Visual Basic

2

522

07.11.2010 23:16

majso

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

Priklad Delphi

v Delphi, Visual Basic

3

175

25.01.2017 8:46

focko

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

Priklad pre hlavicky

v Vzdelanie, štúdium, škola

17

654

09.05.2010 18:08

eXistenZ

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

Priklad z fyziky

v Vzdelanie, štúdium, škola

18

1194

06.05.2008 22:07

molotow

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

priklad z fyziky

v Vzdelanie, štúdium, škola

8

1087

15.03.2008 15:19

petos

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

Príklad z Fyziky

v Vzdelanie, štúdium, škola

3

178

13.12.2014 19:29

Daron

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

Theveninova veta - priklad

v Elektronika

2

3394

03.01.2008 18:42

sike9

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

Príklad z fyziky

v Vzdelanie, štúdium, škola

4

158

14.05.2013 22:10

InVader

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

Príklad v Matlab-e

v Ostatné programy

0

169

02.12.2011 11:51

the_pivo

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

SWF upload - funkcny priklad

v JavaScript, VBScript, Ajax

0

421

12.04.2009 1:07

Blackshadow

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

Cisco Packet Tracer príklad

v Poskytovatelia internetu

7

91

15.01.2018 12:56

Kraliček

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

Banalny priklad-char. tranzistora

v Elektronika

10

826

07.03.2007 12:43

Taomas

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

htaccess - konkretny priklad - problem

v Ostatné

6

354

21.04.2010 19:57

baumax



© 2005 - 2018 PCforum, edited by JanoF