Pascal
program temper;
uses Sysutils;
var fisierIntrare,fisierIesire:string;
tfIn,tfOut:Text;
i:integer;
s,rez:double;
temp:array[1..12] of integer;
begin
fisierIntrare:='date.in';
fisierIesire:='date.out';
AssignFile(tfIn,fisierIntrare);
reset(tfIn);
AssignFile(tfOut,fisierIesire);
rewrite(tfOut)
for i:=1 to 12 do
begin
read(tfIn,temp[i]);
s:=s+temp[i];
end;
writeln('Temperatura medie anuala:',FormatFloat('0.00',s/12));
writeln(tfOut,FormatFloat('0.00',s/12);
close(tfOut);
end.
C++
#include <iostream>
#include <fstream>
#include <iomanip>
using namespace std;
int main(){
int temp[12],i;
double rez,s;
ifstream fid("date.in");
ofstream fod("date.out");
for(i=0;i<12;i++){
fid>>temp[i];
s=s+temp[i];
}
cout<<"Temperatura medie anuala:"<<fixed<<setprecision(2)<<s/12;
fod<<fixed<<setprecision(2)<<s/12;
return 0;
}
