- Stahuj zápisky z přednášek a ostatní studijní materiály
- Zapisuj si jen kvalitní vyučující (obsáhlá databáze referencí)
- Nastav si své předměty a buď stále v obraze
- Zapoj se svojí aktivitou do soutěže o ceny
- Založ si svůj profil, aby tě tví spolužáci mohli najít
- Najdi své přátele podle místa kde bydlíš nebo školy kterou studuješ
- Diskutuj ve skupinách o tématech, které tě zajímají
Studijní materiály
Hromadně přidat materiály
Zápočťák
AP_1 - Algoritmizace a programovací techniky
Hodnocení materiálu:
Zjednodušená ukázka:
Stáhnout celý tento materiálprogram slovo;
uses crt, dos;
var vstup, vystup: text;
i, y, mezera1, mezera2: byte;
radek, x, z: string;
a:char;
function najdi_slovo(): string;
begin
mezera1:= pos(' ', radek); //najde prvni mezeru v radku
delete(radek,1,mezera1); //vymaze slovo pred prvni mezerou
x:=radek;
mezera2:= pos(' ', radek); //najde druhou(ted jiz prvni) mezeru v radku
delete(radek, 1, mezera2);//vymaze hledane slovo
y:= ord(radek[0])+1;//zmeri delku retezce za slovem
delete(x, mezera2, y);//vymaze zbytek
Vloženo: 28.04.2009
Velikost: 23,00 kB
Komentáře
Tento materiál neobsahuje žádné komentáře.
Copyright 2024 unium.cz