
Shopobag
6 год назад
Напишите программу, рассчитывающую зарплату, которая будет получена после удержания подоходного налога в p%, если оклад составляет А рублей
Паскаль
ОТВЕТЫ

Leazhel
Jul 6, 2019
Var a,p,r:real;
begin
write(A = );
readln(a);
write(p = );
readln(p);
r:=a*(1-p/100);
writeln(Зарплата = ,r);
end.
Пример:
A = 2000
p = 13
Зарплата = 1740
begin
write(A = );
readln(a);
write(p = );
readln(p);
r:=a*(1-p/100);
writeln(Зарплата = ,r);
end.
Пример:
A = 2000
p = 13
Зарплата = 1740
206