Переведите программу о сдаче с языка Кумир на язык Паскаль
алг Сдача
нач
. цел s,k500,k100,k50,k10
. ввод s
. k500:=div(s,500)
. s:=mod(s,500)
. k100:=div(s,100)
. s:=mod(s,100)
. k50:=div(s,50)
. s:=mod(s,50)
. k10:=div(s,10)
. s:=mod(s,10)
. вывод "сдано:",нс
. вывод "купюр по 500р. - ",k500,нс
. вывод "купюр по 100р. - ",k100,нс
. вывод "купюр по 50р. - ",k50,нс
. вывод "купюр по 10р. - ",k10,нс
кон
Наберите в программе Паскаль протестируйте на значении s=4960
Ответы на вопрос:
var s,k500,k100,k50,k10: integer;
begin
readln(s);
k500:=s div 500;
s:=s mod 500;
k100:=s div 100;
s:=s mod 100;
k50:=s div 50;
s:=s mod 50;
k10:=s div 10;
s:=s mod 10;
writeln('Сдано:');
writeln('купюр по 500р. - ',k500);
writeln('купюр по 100р. - ',k100);
writeln('купюр по 50р. - ',k50);
writeln('купюр по 10р. - ',k10);
end.
program Сдача;
var s,k500,k100,k50,k10:integer;
begin
readln(s);
k500:=s div 500;
s:= s mod 500;
k100 := s div 100;
s:= s mod 100;
k50:= s div 50;
s := s mod 50;
k10 := s div 10;
s := s mod 10;
writeln('сдано:');
writeln('Куплю по 500р - ', k500);
writeln('Куплю по 100р - ', k100);
writeln('Куплю по 50р - ', k50);
writeln('Куплю по 10р - ', k10);
end.
Ввод:
4960
Вывод:
4960
сдано:
Куплю по 500р - 9
Куплю по 100р - 4
Куплю по 50р - 1
Куплю по 10р - 1
Моделирование упрощает процесс познания, так как выделяет и отображает только нужную грань реальности, абстрагируясь от незначимых факторов. Текстовая задача — это словесная модель некоторой реальной ситуации. Чтобы решить задачу, надо построить ее математическую модель.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
lenapakhomowa20.06.2023 13:32
-
Dashuli4ka200106.01.2021 02:09
-
Gali7731.12.2022 12:42
-
matema221.10.2021 12:59
-
адильчичек02.02.2022 03:22
-
Надюша1305200215.06.2020 10:27
-
Николь56027.05.2023 02:06
-
noeva200522.09.2021 22:05
-
Dailll09.05.2023 11:12
-
nugumanovsalavp092yo01.01.2021 12:44
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.