Caute heh,este nikdy som nic s programovanim nerobil a zacal som vcera citat jednu knizku.robim v turbo pascale a ked uz aj spravim nejaky ten program .exe tak ho spustim zadam hodnoty,ale co teraz?ked dam enter zatvori mi cele okno.prepacte za primitivnu otazku.
mam napr.
Kód:
program Priemer;
var Sucet, Cislo : Real;
Pocet : Integer;
begin
Write ( 'Priemer cisel' );
Write ( 'Zadajte cisla,zaporne cislo ukonci vstup ' );
Sucet := 0; Pocet :=0;
Read ( Cislo );
while Cislo >= 0 do
begin
Sucet := Sucet + Cislo;
Pocet := Pocet + 1;
Read ( Cislo );
end;
if Pocet > 0 then
Write ( 'Priemer je ',Sucet/Pocet );
end.
ked spustim .exe subor zadam hodnoty a co teraz?
a este vysvetlite mi co znamena vlastne toto?
Sucet := 0; Pocet :=0;
dik za pomoc
