Oggi finalmente abbiamo iniziato gli scrawlgames abbiamo iniziato a valutare gli scrabocchi dei compagni il mio non ancora sarà per domani cmq ci è stato chiesto di lasciare un commento bè direi che il mio spero che piaccia perchè a mio parere è carino forse qualche istruzione di troppo e ma se no il risultato sarebbe stato macrabo da vedere.... aspettiamo la valutazione di domani del prof. e dei compagni......
Cmq il programma di ieri va completato così
program pasqua;
var x,a,b,c,d,e,f,g,h,i,j,k,l,m:integer;
begin write('AAAA:');readln(x);
a:=x mod 19;
b:=x div 100;
c:=x mod 100;
d:=b div 4;
e:=b mod 4;
f:=(b+8) div 25;
g:=(b-f+1) div 3;
h:=(19*a+b-d-g+15) mod 30;
i:= c div 4;j := c mod 4;
k:=(32+2*e+2*i-h-j) mod 7;
l:=(a+11*h+22*k) div 451;
m:=(h+k-7*l+114);
write('Il giorno',m mod 31+1);
if m div 31=3 then write ('Marzo') else write('Aprile');
writeln('del',x,'è Pasqua');
readln;
end.
Si è proprio così questo programmino dopo avere inserito l'anno vi calcola il giorno di Pasqua.Ringraziamo PIAZZI GIUSEPPE
Inoltre il prof. ci ha mostrato il programma per calcolare il numero di istruzioni di un altro programma... esso da come output due file uno output.txt e uno scrawl.xls con dentro il numero delle istruzioni.
Infine siamo stati invitati a partecipare presso la sala Vitali il 27 gennaio al internet saloon molto interessante.La metà della prossima verifica si terrà su questo incontro.Spero di riuscire ad andarci visto che alle 3 ho l'esame della patente.
Nessun commento:
Posta un commento