10. составить алгоритм и написать решение на паскале: определить стоимость покупки с учетом скидки в 5%, если начальная стоимость покупки равна х.

Скидка на 5% от величины - это то же, что 95% от величины.
Таким образом, нам надо:
var-блок ввести действительную переменную x
(тело программы)
прочитать переменную x
определить переменную x как 0.95 от уже существующего x
написать переменную x
конец

на любом диалекте Паскаля должно работать, по идее:

var x:real;
begin
read(x);
x:=0.95*x;
write(x);
end.

Если что-то не так написать мне для совместного разрешения ошибки/проблемы. :)