Даю 40 баллов! Задача в Паскале Ввести с клавиатуры цену товара без скидки. Ввести...

Question

Даю 40 баллов!
Задача в Паскале
Ввести с клавиатуры цену товара без скидки.
Ввести скидку число от 0 до 100.
Посчитать стоимость товара с учётом скидки
Заранее большое спасибо!

Comments

за это 40 баллов? серьезно?

---

это для привлечения внимания))

---

мде, обманывать не хорошо :)

Answer 1

Var
price,discnt:real;
begin
Read(price);
Readln(discnt);
Writeln(price * (1 - discnt/100));
end.

Пример:
100
12.5
87.5