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

varprice,discnt:real;beginRead(price);Readln(discnt);Writeln(price * (1 - discnt/100));end.Пример:10012.587.5