Составить программу (полный текст программы) вычисления стоимости покупки с учетом скидки. Скидка в 3% предоставляется, если сумма покупки больше 500 руб,
5-9 класс
|
в 5% - если сумма больше 1000 руб. Фрагмент программы: if x>500 then y:=0.97*x; if x>1000 then y:=0.95*x;
var
x: real;
begin
readln(x);
if(x > 500) then x := 0.97 * x
else if(x > 1000) then x := 0.95 * x;
writeln('Стоимость покупки с учетом скидки: ', x);
end.
Другие вопросы из категории
стоянку заехал автомобиль черного цвета равен 8 битам. количество информации в сообщении на стоянку заехал не красный автомобиль равно 6 битам. определите сколько в княжестве автомобилей черного цвета
Читайте также
ВХОДНЫЕ ДАННЫЕ S- стоимость покупки с учетом скидки( если она предоставляется)
выведите на экран их сумму. Если все они нечетные и A>B>C, то определите и выведите значения наибольшего и наименьшего из чисел. Иначе, выведите числа без изменения. Фрагмент программы: if (a mod 2 = 0) and (b mod 2 = 0) and (c mod 2 = 0) then begin S:=a+b+c; writeln('сумма равна ', S); end; if (a mod 2 <> 0) and (b mod 2 <> 0) and (c mod 2 <> 0) and (a>b) and (b>c) then begin writeln('наибольшее число ', A); writeln('наименьшее число ', C); end else writeln('a= ',a,' b= ', b, ' c= ',c);