Составить задачу в Pascal ABC

Через 3 месяца работы вы решили сходить в отпуск. Вам должны выплатить отпускные в размере среднемесячной зарплаты. Напишите программу, которая позволит вычислить ваши отпускные.

А=1 зп (11000)

B=2 зп (12000)

С=3 зп (10000)

(A+B+C) / 3 средняя

Question

Веруха

31 августа, 17:12

+2

Ответы (1)

Знаете ответ на вопрос?

Ива · Answer 1

Как то так)

Program p1;

Var a, b, c, d:real;

Begin

a:=11000;

b:=12000;

c:=10000;

d: = (a+b+c) / 3;

Writeln ('Ваши отпускные: ', d) ;

End.