Написать программу на паскале и нарисовать блок схему. Стоимости покупки с учетом скидки в 10%, если сумма покупки больше 1000 рублей
Сумма покупки 1200 со скидкой 1090
Var s:real;
begin
write(s=); readln(s);
if s>1000 then s:=s-0.01*s;
writeln(S=,s);
end.
Пример:
s=1200
S=1020
Блок-схема - в прилагаемом файле
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
