Хватит ли вам денег на покупку диска?

@Beloff9999 · Регистрация: 28.12.2016

Author24 — интернет-сервис помощи студентам

Музыкальный диск стоит X руб. N коп. У вас имеется A руб. B коп. Хватит ли вам денег на покупку диска? В программе предусмотреть вывод фраз "ДА" или "НЕТ". В случае недостатка определите, сколько денег надо добавить.

echs · 09.04.2017, 19:39

QBasic/QuickBASIC

CLS
 
INPUT "X rub, N kop = "; x, n
INPUT "A rub, B kop = "; a, b
 
Y = 100 * x + n
Z = 100 * a + b
 
IF Y <= Z THEN
   PRINT "YES"
ELSE
   PRINT "NO"
   PRINT "NADO ESHHE"; (Y - Z) \ 100; "rub"; (Y - Z) MOD 100; "kop"
END IF
END

@Beloff9999 0 / 0 / 0 Регистрация: 28.12.2016 Сообщений: 15
		1
	Хватит ли вам денег на покупку диска? 09.04.2017, 19:02. Показов 1609. Ответов 1 Метки нет (Все метки) Музыкальный диск стоит X руб. N коп. У вас имеется A руб. B коп. Хватит ли вам денег на покупку диска? В программе предусмотреть вывод фраз "ДА" или "НЕТ". В случае недостатка определите, сколько денег надо добавить. 0

	09.04.2017, 19:39

Опции темы

Хватит ли вам денег на покупку диска?

Решение