Zaujímavosti o referátoch
Ďaľšie referáty z kategórie
Pascal - cykly
Dátum pridania: | 30.11.2002 | Oznámkuj: | 12345 |
Autor referátu: | sova | ||
Jazyk: | Počet slov: | 527 | |
Referát vhodný pre: | Stredná odborná škola | Počet A4: | 1.6 |
Priemerná známka: | 2.98 | Rýchle čítanie: | 2m 40s |
Pomalé čítanie: | 4m 0s |
priradí nasledovníka alebo predchodcu. Cyklus skončí keď z=k. Všetky cykly sa môžu použiť aj ako cyklus v cykle. To znamená, že podcyklus bude vlastne príkazom v tele cyklu. Dá sa použiť napr. pri načítavaní dvojrozmerného pola. Príkazy so známym počtom opakovaní sa môžu použiť ďalej pri načítavaní, výpise pola, pri lineárnom a binárnom vyhľadávaní, pri triedení atď. PRÍKLAD:
Zostavte program, ktorý vypočíta aritmetický priemer z čísel, ktoré zadá užívateľ. Program pr1;
var i,pocet:integer;sucet,zlozka,priemer:real;
begin
write('Zadaj pocet cisel: ');readln(pocet);
sucet:=0;zlozka:=0;writeln;
for i:=1 to pocet do begin
write('Zadaj ',i,' zlozku: ');readln(zlozka);
sucet:=sucet+zlozka;
zlozka:=0;
end;
priemer:=sucet/pocet;writeln;
writeln('Priemer zo zadanych cisel je: ',priemer:2:2);
readln;
End.