Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
прпрпрп
0 / 0 / 0
Регистрация: 24.02.2016
Сообщений: 11
1

Исполнилось Василисе-премудрой 18 лет

02.03.2016, 15:14. Просмотров 912. Ответов 1
Метки нет (Все метки)

помогите, пожалуйста, составить программу
1) Исполнилось Василисе-премудрой 18 лет и позвал Кощей ее замуж. От рождения Василиса была жадной и корыстной и решила выйти она замуж за Кощея не по любви, а по расчету. И поставила условие: "Выйду за тебя, если дашь мне 30000 сундуков золота". На тот момент у Кощея было 27600 сундуков. Сколько лет будет Василисе, когда она выйдет замуж, если каждый год прибавляется по 30 сундуков.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.03.2016, 15:14
Ответы с готовыми решениями:

Человеку сегодня исполнилось R лет. Сколько ему дней
Человеку сегодня исполнилось R лет. Сколько ему дней? Часов? Минут? Секунд?...

Получить название игрушек, которые подходят как детям 4 лет, так и детям 10 лет
Дан файл ассортимент, содержащий сведения об игрушках: указывается название...

Получить название игрушек, которые подходят как для 4-х лет, так и для 10-ти лет
Помогите решить задачу в Paskal по теме типизированные файлы. Буду очень...

Ввести возраст человека (от 1 до 150 лет) и вывести его вместе с последующим словом "год", "года" или "лет"
Здравствуйте! Помогите решить задачу! Ввести возраст человека (от 1 до 150...

Исполнилось ли человеку 18 лет
Всем привет. Есть дата рождения и просто дата, надо узнать исполнилось ли...

1
Peoples
1358 / 845 / 751
Регистрация: 06.02.2016
Сообщений: 2,253
Записей в блоге: 18
Завершенные тесты: 4
02.03.2016, 15:33 2
Лучший ответ Сообщение было отмечено прпрпрп как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
program pr;
var
agev:real;
god,raz:real;
coutcu:integer;
begin
agev:=18;       // возраст Василисы
coutcu:=27600; // количество сундуков Кащея
raz:=30000-coutcu;  // сколько не хватает сундуков ( 30 000 - 27600 =2400)
god:=raz/30;   // прибавляет в год 30 сундуков, следовательно 2400/30=80 лет 
agev:=agev+god;   // 18 лет + 80= 98
writeln('Василисе будет: ',agev,' лет.');
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.03.2016, 15:33

Определить, исполнилось ли человеку 16 лет
Даны дата рождения человека и сегодняшняя дата. Требуется определить,...

Языку программирования С++ исполнилось 25 лет
Первый официальный гид по новосозданному языку С++ появился ровно 25 лет назад....

Операционной системе Windows XP исполнилось 10 лет
Ровно 10 лет назад корпорация Microsoft начала поставки первых копий...


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

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

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