GRY-Online.pl --> Archiwum Forum

Programowanie w jezyku Turbo Pascal. Czesc 1

04.06.2004
22:50
[1]

Xaar [ Uzależniony od Marysi ]

Programowanie w jezyku Turbo Pascal. Czesc 1

Mnostwo osob ma problemy z Pascalem (ja tez:) Zeby zapobiec powstawaniu nowych watkow zalozylem ten cykliczny.

No i wlasnie mam problem z pascalem. Najlepiej jak dam przyklad:
x:=integer
read(x)
i gdy wpiszemy cyfre wszystko jest ok ale gdy wpisujemy litere albo jakis inny znak nie bedacy cyfra program przerywa swoja prace. i wlasnie jak temu zapobiec.

04.06.2004
22:52
[2]

Przewodnik Syriusza [ Magazyn Grafik ]

Jest wątek seryjny o programowaniu...

04.06.2004
22:53
smile
[3]

_Robo_ [ Generaďż˝ ]

O moj Boze, Ty masz problem z przeczytaniem podstaw, a nie z pascalem :) Integer to typ liczbowy calkowity (od -32768 do +32767 czy jakos tak). Nic dziwnego ze w miejscu gdzie spodziewa sie liczby wywala blad jak wpiszesz litere:)

04.06.2004
22:59
[4]

Xaar [ Uzależniony od Marysi ]

Przewodnik Syriusza--------->gdzie????? szukalem pod programowanie, pascal, turbo pascal i nie znalazlem watku seryjnego
Robo---->wiem co to jest integer i tam ma byc integer. tylko na najblizszy tydzien stracilem zeszyt od informy a pamietam ze cos takiego robilismy w szkole. i pozniej jakos w warunkach IF (chyba) cos sie wpisywalo i nie wywalalo z programu

04.06.2004
23:02
[5]

Qbaa [ Generaďż˝ ]

poniższy programik akceptuje tylko cyfry oraz escape, może się przyda :)
uses crt;
var
a:integer;
b:char;
procedure znak(b:char);
begin
repeat
writeln('podaj pojedynczĄ cyfr©, escape zakaäcza');
b:=readkey;
a:=ord(b)-48;
if a=-21 then exit;
until (a>=0) and (a<=9);
writeln(a);
znak(b);
end;
begin
znak(b);
end.


co do twojego problemu... poczytaj jakieś kursy :) ja też jestem poczatkujący, ale akurat to wiedziałem :D

© 2000-2025 GRY-OnLine S.A.