При уходе в отпуск работнику выплачивают отпускные в размере среднего месячного заработка. Составьте программу для вычисления отпускных по данным о зарплатах за месяцы, которые работник проработал в прошедшем году — Pascal(Паскаль)

const n=12;
var z:array[1..n] of real;
    sr:real;
begin
writeln('Введите зарплату за последние 12 месяцев:');
sr:=0; 
for i:=1 to n do
 begin
  write(i,' месяц =');
  readln(z[i]);
  sr:=sr+z[i];
 end;
sr:=sr/n;
writeln('Отпускные составят ',sr:0:2);
readln
end.

Leave a Comment

80 − 77 =