Znajdźcie błąd bo mi ręce opadają...
Użytkownik =ToRRent= edytował ten post 29.11.2012 09:26
Witamy w Nieoficjalnym polskim support'cie AMX Mod X, jak w większości społeczności internetowych musisz się zarejestrować aby móc odpowiadać lub zakładać nowe tematy, ale nie bój się to jest prosty proces w którym wymagamy minimalnych informacji.
|
Napisano 29.11.2012 09:25
Użytkownik =ToRRent= edytował ten post 29.11.2012 09:26
Napisano 30.11.2012 08:02
program Untitled; Var tablica:array[1..100] of Integer; Var a, parzyste:Integer; Var i:Byte; Var temp:Byte; begin parzyste := 0; i := 1; Writeln('Wpisz liczbe'); Readln(a); while a<>0 do begin if i<=100 then begin tablica[i] := a; i := i + 1; Writeln('Wpisz liczbe'); Readln(a); end else begin a:=0; temp := i; end; end; i:=1; while i <= temp do begin if tablica[i] MOD 2 = 0 then begin parzyste := parzyste + 1; i:=i+1; end else i:=i+1; end; writeln('Wpisales ', parzyste, ' liczb parzystych'); readln(); end.
if i<=100 thenNa
if i<100 then
If you can dream it, you can do it.
Napisano 30.11.2012 08:23
Napisano 01.12.2012 08:51
If you can dream it, you can do it.
Napisano 04.12.2012 00:15
Pascal
"Zaufany" program?Napisany przez MonsterLevel, 05.10.2014 pascal |
|
||||
Pascal
Pomoc w schemacie Hornera (obliczanie wartości wielomianu)Napisany przez K!113r, 31.01.2013 pascal |
|
||||
Pascal
[freepascal] GetPixelRGB(x, y);Napisany przez daedhelil, 16.01.2013 pascal |
|
||||
Pascal
Nie potrafię napisać programu na długość przeciwprostokątnejNapisany przez Fail, 17.09.2012 Pascal |
|
||||
|
Pascal
[ROZWIĄZANE] Skompilowanie programuNapisany przez Na 5tyk, 10.08.2012 pascal |
|
0 użytkowników, 0 gości, 0 anonimowych