www.techinf1.fora.pl

rekordy, co to takiego? otoz ku zdziwieniu(tych 'tępszych', bo ci normalniejsi pamietaja;P) nie bedziemy bic rekordow guinessa etc.

jezeli chcemy zapisac np 10osob, wraz z ich numerami telefonow, m ...

program pliczki;

var
f : text;
nazwa, L,tekst,wybor:string;

procedure zapis;
begin
rewrite(f);
writeln('wybrales zapis:');
writeln('podawaj to co mam wpisac do pliku,"koniec& ...

podstawy, czyli znaczenie poszczegolnych slow kluczowych:

assign-skojarza nazwe pliku ze zmienna(szerzej za chwilke)
rewrite-otwiera calkiem nowy plik, jesli plik istnieje, to czysci jego zawarto ...

pierw calosc programu: (i zaraz go 'rozczlonkuje i omowie po koleji wszystko');
************************************************************
program kolo ;
uses GRAPH, crt;
var tryb, karta,r : int ...

jezeli w programie robimy 10x to samo(A nie mamy mozliwosci zastosowania petli), to nie ma sensu kopiowanie paru linijek i wklejanie ich nizej. wystarczy zastosowac procedure.

procedury sa dosc dzi ...

ponawiam temat, widze ze nie ma sensu dalej prowadzic forum(to nic nie daje..)

napiszcie jakies argumenty ktore przerkonaja mi do zostawienia tego forum;)

program losowanie ;
var a,licz,c,pet : integer ;
b : array [1..10] of integer ;

begin
writeln('zrobiony przez K.J');
randomize;

for pet:=1 to 10 do
begin
for a:=1 to 10 do
begin ...

program silnia ;
var a , wyn, sil : integer ;

begin
writeln('podaj liczbe ktorej silnie mam obliczyc');
readln(sil); {wczytuje podana liczbe jako zmienna 'sil'}
wyn:=1; {za zmienna wynik przy ...

nie wszyscy tutaj beda wiedziec o co chodzi, wrzucaj komentarze

program zapelnianie;
uses crt;
var
x:array:=5;{tablica sterowania zmienna i, (wiecej pisze pod programem;)}
end;
rea ...

glosowac!

do obydwu zadan (wypisywanie liczb nieparzystych, i parzystych) bedzie nam potrzebna reszta dzielenia (mod) przez dwa. a zadanie bedzie wygladalo tak:

program parzyste ;
var liczba: integer ;
p ...

zadanie polega na wyzerowaniu tablicy(do kazdej komorki tablicy trzeba wpisac zero):

trzeba uzyc petli, jednej zmiennej do sterowania petla,
i jednej zmiennej tablicowej
a program bedzie wyglada ...

wpisujemy dane do tablicy od tylu.

program tablica ;
var tab : array[1..10] of integer
a , b: integer ;

begin
for a:=10 downto 1 do
begin
writeln('wprowadz liczbe');
readln(b);
t ...

STRING to tekst, uzycie go jest troche bardziej skomplikowane
wyglada tak:

przypisywanie string"ów:
a:='pascal'; {do zmiennej a przypisze tekst "pascal",tekst musi byc w ap ...

aby zakonczyc program po np ifie uzywamy HALT;

napisze przykladowy program z zastosowaniem "Halt"

program przykladowy ; {rozpoczecie programu}
var a : integer; ...