Question

Помогите, либо блок-схему, либо на Паскаль написать.
Дана сумма начисленной заработной платы. Из этой суммы необходимо удержать 12% на подоходный налог, 1% на профсоюзный налог, 1% на пенсионный налог и добавить 45 %. Полученную сумму к выдаче вывести на экран.

Answer 1

##

var Начислено := ReadReal('Введите сумму:');

var ПроцентУдержаний := 12 + 1 + 1;

var Удержано := Начислено * ПроцентУдержаний/100;

var Надбавка := (Начислено - Удержано) * 45/100;

var КВыдаче := Начислено - Удержано + Надбавка;

Print('Сумма к выдаче:', КВыдаче)