Написать программу в Паскале

Найти общую сумму выплаченой зарплаты, если сотрудник работал x часов, y дней, получал в час n грн

Всего работало m сотрудников

Question

Ерофей

9 февраля, 22:58

+2

Ответы (1)

Знаете ответ?

Македон · Answer 1

Program z;

var sum, x, y, n, m: real;

begin

readln (x, y, n, m) ;

x:=x+y*24;

sum:=m*x/n;

writeln (sum) ;

end.

Написать программу в ПаскалеНайти общую сумму выплаченой зарплаты, если сотрудник работал x часов, y дней, получал в час n грнВсего работало m сотрудников