Написать программу на паскале. Задание Подоходный налог взимается в зависимости от годового дохода S:
Var s,n:integer; begin writeln('vvedite dohod'); readln(s); if (s<20000) then writeln('nalog = 0') else <br>if (s>=20000) then begin s:=s-20000; n:=(s*13) div 100; writeln('nalog = ', n); end; end.
а можно по подробнее что бы написать блок схему
программа просит ввести доход --> вводится доход --> проверка условия --> если доход меньше 20000 то сразу пишем налог = 0 --> если же доход больше 20000 то от дохода отнимаем 20000 ( по условию) , и от остатка вычисляем налог. --> выводим получившийся налог
Спасибо большое