Răspuns :
var n : byte; l : string;begin write('Dati nr lunii: '); readln(n); case n of 1: l:='Iarna'; 2: l:='Iarna'; 3: l:='Primavara'; 4: l:='Primavara'; 5: l:='Primavara'; 6: l:='Vara'; 7: l:='Vara'; 8: l:='Vara'; 9: l:='Toamna'; 10: l:='Toamna'; 11: l:='Toamna'; 12: l:='Iarna'; else writeln('Ati introdus o cifra gresita'); end; write(l); readln;end.
Vă mulțumim că ați accesat site-ul nostru dedicat Informatică. Sperăm că informațiile furnizate v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Vă așteptăm cu drag să reveniți și nu uitați să ne salvați la favorite!