Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.85/13: Рейтинг темы: голосов - 13, средняя оценка - 4.85
0 / 0 / 0
Регистрация: 04.03.2016
Сообщений: 11
1

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

05.03.2016, 07:23. Просмотров 2644. Ответов 2
Метки нет (Все метки)

Добрый день! Не могли бы вы помочь с задачкой в паскаль?
Музыкальный диск стоит х тенге п тиын. У вас имеется а тенге и b тиын. Хватит ли денег на покупку диска? В программе предусмотреть вывод слов «Да» или «Нет». В случае недостатка, определить, сколько денег нужно добавить.
Заранее спасибо!
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.03.2016, 07:23
Ответы с готовыми решениями:

Определить, хватит ли денег на покупку
есть какая то любая сумма денег.даны перчатки,носки и галстуки и у них может быть любая цена....

Определить, хватит ли денег на покупку и не останется ли сдача
В кафе продают лимонад по L рублей и мороженое по M рублей. Покупатель за N лимонада и K мороженого...

Определить хватит ли денег на покупку А кг яблок
Определить хватит ли денег на покупку А кг яблок (хватит или не хватит). Паскаль

Определить, хватит ли денег на покупку диска
2) Музыкальный диск стоит X руб. N коп. У вас имеется A руб. B коп. Хватит ли вам денег на покупку...

2
Модератор
62221 / 46516 / 32069
Регистрация: 18.05.2008
Сообщений: 112,446
05.03.2016, 08:39 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var x,n,xn,a,b,ab:integer;
    s:string[3];
begin
writeln('Введите стоимость диска в тенге и тиын');
readln(x,n);
writeln('Введите количество имеющихся денег в тенге и тиын');
readln(a,b);
xn:=x*100+n;
ab:=100*a+b;
if ab>=xn then write('Да')
else
 begin
  a:=(xn-ab)div 100;
  b:=(xn-ab)mod 100;
  writeln('Нет');
  writeln('Нужно добавить ',a,' тенге ',b,' тиын')
 end;
end.
1
0 / 0 / 0
Регистрация: 04.03.2016
Сообщений: 11
05.03.2016, 08:46  [ТС] 3
При много благодарен))
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.03.2016, 08:46

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Хватит ли вам денег на покупку диска?
Музыкальный диск стоит X руб. N коп. У вас имеется A руб. B коп. Хватит ли вам денег на покупку...

Ветвление: Хватит ли вам денег на покупку диска?
Добрий день товарищи!!! Помогите сделать задачу. Музыкальный компакт-диск стоит х-руб. n-коп. У...

Определить, хватит ли денег на покупку джинсов со скидкой
Здравствуйте,решите пожалуйста задачу на языке java Написать программу, которая определяет, хватит...

Определить, хватит ли имеющейся суммы денег на покупку линолеума
Добрый вечер! Помогите пожалуйста. Для прямоугольной комнаты размером W x H метров нужно закупить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.