Se considera declaratiile:
Type ora=0..23
Grade=-40..40
Temperatura=array[ora] of grade
Var t:temperatura;
Sa se elaboreze un program care:
a) indica maximul si minimul temperaturii
b)indica ora(orele) la care s-a inregistrat temperatura maxima
c) indica ora(orele) la care s-a inregistrat temperatura minima
a) var t: temperatura;
s:real;
i:ora;
for i:=0 to 23 do realdn (t[i]);
s:=0;
for i:=0 to 23 do s:=s+ t[i];
writeln ('temperatura medie este' , s:24:6:2);
readln;
end.
Vă mulțumim pentru vizita pe platforma noastră dedicată Informatică. Sperăm că informațiile prezentate v-au fost utile. Dacă aveți întrebări sau aveți nevoie de suport suplimentar, nu ezitați să ne contactați. Așteptăm cu entuziasm să reveniți și vă invităm să ne adăugați la lista de favorite!