1. Информатика
  2. Диск стоит Х рублей. У вас имеется

Диск стоит Х рублей. У вас имеется А рублей. Хватит ли вам денег на покупку диска? В программе предусмотрите вывод фраз «ДА» или «НЕТ». В случае недостатка, определите сколько денег надо добавить.
РЕШИТЬ С

Zumman Zumman    1   07.04.2020 04:45    4

Ответы
Оксана291103 Оксана291103  12.10.2020 20:38

input "цена диска:", x

input "сбережения: ", a

if x <= a then

print "ДА"

else

z = x - a

print "НЕТ"

print "Вам не хватает ", z, " рублей."

end if

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
violettaya12 violettaya12  26.03.2020 22:52
Из 12 нот разной высоты, но равной длительности могут быть составлены мелодии, записываемые в файлы различной длины. Каждая нота кодируется минимальным числом бит....
magasadrudinov magasadrudinov  26.03.2020 22:52
Сообщение, записанное латинскими буквами, кодируется так, что на каждую букву приходится одинаковое минимально возможное число бит. Сколько бит нужно, чтобы закодировать...
юля2713 юля2713  21.05.2020 14:02
Написать программу, которая считывает текст из файла и выводит на экран только цитаты, то есть предложения, заключенные в кавычки. Написать на языке C#...
Вячеслав991 Вячеслав991  07.04.2020 17:40
Какой кулер лучше deepcool ice blade 100 или AMD OEM на AMD A8-7680...
Direx1337 Direx1337  07.04.2020 17:46
Дано логическое выражение: (a 2)and(a≤45) . Такое логическое выражение возвращает истину, лишь в том случае, когда истинны оба выражения, т.е.,...
PEWALWIK PEWALWIK  07.04.2020 17:48
Дан целочисленный массив, заданный датчиком случайных чисел в интервалеот -100 до 500. Требуется умножить отрицательные значения элементов этогомассива на 10.(Язык...
наука28 наука28  07.04.2020 17:49
Предложить свой вариант ПО для работы с графикой (кроме продуктов ADOBE) и подробно описать его по схеме: 1. Название, разработчик, история продукта 2. Назначение редактора...
Рауза1951 Рауза1951  07.04.2020 17:50
4. Напишите код программы, которая будет вычислять периметр фигуры. print () a=... b=... c=... p=... print (...) Дескриптор...
алекей4 алекей4  07.04.2020 18:30
Что будет напечатано в результате выполнения следующей программы, если значение R=-10? readln (R); if R=0 then Y:=R*10; if R 0 then Y:=R+10; if R 0 then Y:=R-10; writeln...
АрінаЛеснічая АрінаЛеснічая  07.04.2020 18:31
Задание для Pascal. Задача только те элементы, значения которых кратно 12. Алгоритм: - заполнить массив элементами; - организовать цикл по суммированию элементов массива;...

Популярные вопросы