logo
Войти Регистрация Спроси ai-bota


konoval1i
09.06.2020 09:11

Написать программу вычисления стоимости покупки с учётом скидки: скидка в 10% предоставляется, если сумма покупки > 1000 руб.

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
karolina000000
karolina000000
20.07.2021 05:52
7(A^B) and (C^A) = ?A=1 B=0 C=0​...
nparshina14
nparshina14
19.08.2022 00:32
Запишите алгоритм, под управлением которого Робот, начальное положение которого отмечено *, закрасит от- меченные на рисунке клетки, расположенные вдоль сте- ны. Длина стены...
ирина1834
ирина1834
17.11.2020 07:23
Ребята такая проблема! Всё началось с того что мне было необходимо подвинуть ПК и как я уже понял (было уже поздно) DVI от видеокарты немного вылетел. Когда я включил комп...
Yasmina55
Yasmina55
05.07.2022 20:27
Пользователь вводит с клавиатуры время в секундах. необходимо написать программу, которая переведет введенные пользователем секунды в часы, минуты, секунды и выводит их на...
sanekpalyxa
sanekpalyxa
04.08.2022 03:07
1. в прямоугольном треугольнике известны катет и гипотенуза(ввод с другой катет. 2.для расчета функции z=x2-квадратный корень из y+15,7*x x ввод с клавиатуры....
takeoff
takeoff
01.02.2020 05:44
Решите : даны 2 ненулевых числа. найти сумму, разность, произведение и частное их модулей. желательно оформите, как решение в паскале...
Danya135evlanov
Danya135evlanov
29.01.2021 04:40
Рассказ, набранный на компьютере, содержит 12 страниц. на каждой странице 40 строк по 32 символа в строке. определите информационный объём рассказа в кодировке unicode. (считать,...
alina56737
alina56737
29.09.2020 15:24
Написать программу вычисления площади параллелограмма. ниже приведен рекомендуемый вид экрана во время выполнения программы Вычисления объема прямоугольника Введите исходные...
Milykenon101
Milykenon101
16.07.2022 01:22
Как защитить компьютер от вредоносных программ . Дескриптор : Определение наличия признаков вредоностных программ в ПК . Описание необходимости защиты ПК от вредоносных программ...
xammatovrunar
xammatovrunar
20.08.2022 10:41
Адам мен компьютер жады арасындагы уксастык пен айырмашылык такырыбында шагын жоба жумысын дайындандар! Отинем комектесиниздерши​...
Ответ:
nazek121992
27.05.2020 03:04

var a:real;

begin

readln(a);

if a>1000 then a:=a*0.9;

writeln(a);

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота