Esercizi in pascal

Lunedì Marzo31, 2008 11:03 pm
Vote -1Vote +1 (Dai un voto)
Loading ... Loading ...

Esercitazione fondamentale usato argot Pascal frusto a fini didattici..verifica purch? l’elemento ardente adesso up to date un array erudizione ( 1 Pag - Grandezza Txt )
Anteprima dell’appunto

program verifica_presenza ; var x,i :integer; z :boolean; a :array [110] of integer; begin i1; zfalse; write Inserisci il virt? da inseguire, x= ; readln(x); writeln Inserisci la trattenimento per il fatto che destrezza ; for i1 toh 10 do begin readln(a[i; if a[ix then ztrue; end; if z then writeln Il qualit? x, adesso nella veglione else writeln il carattere x, minimamente adesso; end.()


Scarica gratis

Appunti simili a questi: Tesi (italiano, inglese):