Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
liiiiiiiiiii
26.02.2022 01:42 •
Информатика
Определите порядок действий компьютера при вычислении выражения:
Показать ответ
Ответ:
McКлей
08.06.2023 07:43
Я не экономист и не экстрасенс, так что если именно сама формула подсчета дохода неверна - меняйте сами, я ее просто нашла в интернете.
var
vklad, dohod, summa, stavka: real;
srok: integer;
begin
write('Величина вклада (р.) - ');
readln(vklad);
write('Срок вклада (дней) - ');
readln(srok);
write('Годовая процентная ставка (%) - ');
readln(stavka);
dohod := (vklad*stavka)/(100*365) * srok;
summa := vklad + dohod;
writeln('Доход: ', Trunc(dohod), ' р.', frac(dohod)*100:3:0, ' коп.');
writeln('Сумма по окончании срока вклада: ', Trunc(summa), ' р.', Frac(summa)*100:3:0, ' коп.');
end.
0,0
(0 оценок)
Ответ:
7777kby777777777778
08.06.2023 07:43
{pascal, консольный ввод}
var
velichina_vklada, srok_vklada, godovaya_procentnaya_stavka: integer;
vklad_s_procentami: real;
vklad_s_procentami_rub, vklad_s_procentami_kop: integer;
dohod_rub, dohod_kop: integer;
begin
write('Величина вклада (р.) - ');
readln();
write('Срок вклада (дней) - ');
readln(srok_vklada);
write('Годовая процентная ставка (%) - ');
readln(godovaya_procentnaya_stavka);
vklad_s_procentami := velichina_vklada * ((real(100) + real(godovaya_procentnaya_stavka)*real(srok_vklada)/365)/100);
dohod_rub := (velichina_vklada - integer(vklad_s_procentami));
dohod_kop := (velichina_vklada*100 - integer(vklad_s_procentami*100)) mod 100;
vklad_s_procentami_rub := integer(vklad_s_procentami);
vklad_s_procentami_kop := integer((vklad_s_procentami*100)) mod 100;
writeln('Доход: ', dohod_rub,' р. ', dohod_kop, ' 80 коп.');
writeln('Сумма по окончании срока вклада: ', vklad_s_procentami_rub, ' р. ', vklad_s_procentami_kop, ' коп.');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
DIlyus
28.06.2022 23:28
«Болашақта желі технологиясының дамуы» тақырыбында эссе жаз....
Boi11
29.08.2022 22:47
Запиши объем информации фразы, расположенной ниже: В слове «ата» 3 байта информации.Заполни пропуск ⬇️.Объем равен ... байт...
ivanow343536373839
19.10.2021 00:55
Почему мощность казахского алфавита равна 42?...
КлубВинксРоссия17
25.06.2020 09:11
Порядок выполнения инструкций в линейном программировании А) в определенных случаях в определенном порядке Б) выполняется последовательно в виде струны друг к другу В) можно...
крис903
02.07.2020 21:53
Написать прогу, которая позволит пользователю ввести 4 целых числа, проверяя, что все числа разные, и проверяет, делится ли первле число на второе, третье, и четвертое одновременно....
lyda777
30.06.2020 12:39
Што такое 2д? Эссе по Казакскаму...
kpiscom2
19.05.2021 10:30
ответьте на вопросы 1) чем отличается строение вен , артерий и капилляров друг от друга? 2) в каких сосудах (вены и артерии капилляры ) кровь движется наиболее быстрее, а в...
2ArtemPetrenko2
19.05.2021 10:30
Кого толстой в повести отрочество наделил автобеографическими чертами ? папу? василия ? николеньку? августа антоныча? выберите правельный ответ...
ПолинаУм2020
19.05.2021 10:30
Начертить две равные фигуры (не многоугольники). верно ли утверждение: если s фигур равны, то и сами фигуры равны....
вап27
19.05.2021 10:30
Write 5 sentences about your favourite sportsman and the kind of sport he\she goes in for! )...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
vklad, dohod, summa, stavka: real;
srok: integer;
begin
write('Величина вклада (р.) - ');
readln(vklad);
write('Срок вклада (дней) - ');
readln(srok);
write('Годовая процентная ставка (%) - ');
readln(stavka);
dohod := (vklad*stavka)/(100*365) * srok;
summa := vklad + dohod;
writeln('Доход: ', Trunc(dohod), ' р.', frac(dohod)*100:3:0, ' коп.');
writeln('Сумма по окончании срока вклада: ', Trunc(summa), ' р.', Frac(summa)*100:3:0, ' коп.');
end.
var
velichina_vklada, srok_vklada, godovaya_procentnaya_stavka: integer;
vklad_s_procentami: real;
vklad_s_procentami_rub, vklad_s_procentami_kop: integer;
dohod_rub, dohod_kop: integer;
begin
write('Величина вклада (р.) - ');
readln();
write('Срок вклада (дней) - ');
readln(srok_vklada);
write('Годовая процентная ставка (%) - ');
readln(godovaya_procentnaya_stavka);
vklad_s_procentami := velichina_vklada * ((real(100) + real(godovaya_procentnaya_stavka)*real(srok_vklada)/365)/100);
dohod_rub := (velichina_vklada - integer(vklad_s_procentami));
dohod_kop := (velichina_vklada*100 - integer(vklad_s_procentami*100)) mod 100;
vklad_s_procentami_rub := integer(vklad_s_procentami);
vklad_s_procentami_kop := integer((vklad_s_procentami*100)) mod 100;
writeln('Доход: ', dohod_rub,' р. ', dohod_kop, ' 80 коп.');
writeln('Сумма по окончании срока вклада: ', vklad_s_procentami_rub, ' р. ', vklad_s_procentami_kop, ' коп.');
end.