[ Príspevkov: 7 ] 
AutorSpráva
Offline

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

Registrovaný: 14.12.08
Prihlásený: 08.01.09
Príspevky: 13
Témy: 3 | 3
NapísalOffline : 08.01.2009 16:32 | pascal

neviem preco mi vypisuje chybu pri in, mozete mi prosim pomoct
Kód:
procedure spoluhlasky (pole:typpole; var vystup:typpole);
var i:integer;
    ret:string;
begin
  for i:=1 to 100 do
  begin
  ret:=pole[i];
  if not ret[1] in ['a','A','e','E','i','I','o','O','u','U''y','Y'] then vystup:=pole[i];
  else vystup:='     '
  end;
end;


Offline

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

Registrovaný: 30.04.08
Prihlásený: 03.12.25
Príspevky: 884
Témy: 3 | 3
NapísalOffline : 08.01.2009 17:04 | pascal

Chyba ti tam ciarka. :rolleyes:
['a','A','e','E','i','I','o','O','u','U','y','Y']


_________________
Empty your memory, with a free()… like a pointer!
If you cast a pointer to an integer,
it becomes the integer, if you cast a pointer to a struct, it becomes the struct…
The pointer can crash…, and can overflow…
Be a pointer my friend…
Offline

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

Registrovaný: 14.12.08
Prihlásený: 08.01.09
Príspevky: 13
Témy: 3 | 3
Napísal autor témyOffline : 08.01.2009 17:19 | pascal

aj tak mi ju tam vypisuje


Offline

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

Registrovaný: 30.04.08
Prihlásený: 03.12.25
Príspevky: 884
Témy: 3 | 3
NapísalOffline : 08.01.2009 17:24 | pascal

Myslim, ze toto by malo byt uzatvorkovane
Kód:
if not (ret[1] in ['a','A','e','E','i','I','o','O','u','U''y','Y']) then ...

(co vsak nie je syntakticke chyba).

Co konkretne ti vypisuje? Ake hlasenie? Je mozne, ze chyba je niekde v zvysku zdrojaku (napr. v type "typpole"). Posli sem zdrojak... :rolleyes:


_________________
Empty your memory, with a free()… like a pointer!
If you cast a pointer to an integer,
it becomes the integer, if you cast a pointer to a struct, it becomes the struct…
The pointer can crash…, and can overflow…
Be a pointer my friend…
Offline

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

Registrovaný: 14.12.08
Prihlásený: 08.01.09
Príspevky: 13
Témy: 3 | 3
Napísal autor témyOffline : 08.01.2009 17:25 | pascal

ak ju urobim takto, mi nevypise ziadnu chybu, ale vobec mi nic ani nerobi

procedure spoluhlasky (pp:typpole; var vystup:string);
var i:integer;
retazec:string;
begin
vystup:='';
for i:=1 to 100 do
begin
retazec:= pp[i];
if retazec[1] in ['a','e','i','o','u','y','A','E','I','O','U','Y']
then vystup:=' '
else vystup:=pp[i];
end;
end;

neviete co mam na tom zle


Offline

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

Registrovaný: 30.04.08
Prihlásený: 03.12.25
Príspevky: 884
Témy: 3 | 3
NapísalOffline : 08.01.2009 17:37 | pascal

Mozes to spravit aj jednoduchsie, staci dat len
Kód:
for i:=1 to 100 do
begin
if (pp[i, 1] in ['a','e','i','o','u','y','A','E','I','O','U','Y']) then
{vystup}
end;

Skus si do toho pola dat len retazce, ktore zacinaju na samohlasku. Potom by ti ich malo vsetky vypisat... :)


_________________
Empty your memory, with a free()… like a pointer!
If you cast a pointer to an integer,
it becomes the integer, if you cast a pointer to a struct, it becomes the struct…
The pointer can crash…, and can overflow…
Be a pointer my friend…
Offline

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

Registrovaný: 14.12.08
Prihlásený: 08.01.09
Príspevky: 13
Témy: 3 | 3
Napísal autor témyOffline : 08.01.2009 17:45 | pascal

uz som na to prisla to else som dala prec a dala tam write


 [ Príspevkov: 7 ] 


pascal



Podobné témy

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

Free Pascal a Turbo Pascal

v Ostatné

0

473

19.12.2014 13:18

Styracoz

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

Pascal

v Ostatné

7

733

09.10.2011 21:30

F3RY

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

pascal

v Ostatné

11

1392

07.04.2007 16:50

programator

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

pascal

v Ostatné

19

3198

30.04.2007 19:54

nikita

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

Pascal

v Ostatné

7

956

14.05.2011 20:04

F3RY

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

pascal

v Ostatné

2

679

24.06.2010 20:17

KatjushaMan

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

Pascal

v Ostatné

4

2669

01.03.2018 8:02

MTK

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

Pascal

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

v Ostatné

40

1751

11.12.2016 22:08

viki

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

pascal

v Ostatné

2

1212

09.03.2007 14:08

misolax

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

pascal

v Ostatné

0

813

03.05.2009 12:35

ebb

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

Pascal

v Kôš

1

30

06.11.2018 14:38

werwest

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

pascal...

v Ostatné

5

1013

18.10.2008 19:02

redog

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

pascal diagram

v Ostatné

7

889

14.01.2009 16:01

dsljohn

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

Pascal: Dátum

v Ostatné

2

440

09.12.2016 14:23

LadyD

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

pascal matice

v Ostatné

2

645

02.04.2012 21:25

F3RY

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

Pascal uloha

v Ostatné

6

591

03.05.2010 7:42

coldak



© 2005 - 2026 PCforum, edited by JanoF