Помогите пожалуйста!

Question

Помогите пожалуйста! (Турбо паскаль, Условный оператор) Задача; Запрашивается стоимость книги и внесенная оплата. Если сумма совпадает со стоимость, то печатается «спасибо». Если оплата меньше стоимости, то печатается «добавьте денег». Если оплата больше стоимости, то печатается «возьмите сдачу» и сумма сдачи. Если сможете то лучше с формулой

Answer 1

63

dimo4ka

10 марта 2023

Program First; uses Crt; var Price, Money: integer; BEGIN write ('Введите стоимость книги '); ReadLn (Price); write ('Введите количество денег '); ReadLn (Money); if Price=Money then write ('Спасибо'); if Money < Price then write ('Добавьте денег'); if Price < Money then write ('Возьмите сдачу: ',Money-Price); END.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: