Вопрос по информатике:
Помогите составить задачу в программе pascal.
Для приготовления квашеной капусты на 10 кг капусты берут 225 г соли, 350 г моркови, 200 г клюквы, 4 г лаврового листа. Сколько соли, моркови, клюквы и лаврового листа надо взять, если закуплено М кг капусты?
- 15.12.2017 13:42
- Информатика
- remove_red_eye 3088
- thumb_up 10
Ответы и объяснения 2
Лови
var
m,a:integer;
b,col,mor,kl,la:real;
begin
write('Сколько кг капусты = ');
readln(m);
a:=m div 10;
b:=m mod 10;
mor:=350*a;
kl:=200*a;
col:=225*a;
la:=4*a;
b:=b*0.1;
mor:=mor+350*b;
kl:=kl+200*b;
col:=col+225*b;
la:=la+4*b;
writeln('На ',m,'кг капусты надо : Морковки - ',mor,'г. Клюквы - ',kl,'г. Соли - ',col,'г. Лаврового листа - ',la,'г');
end.
Тут программа только с двузначными числами работает то есть 15кг 30кг и так далее.
- 17.12.2017 05:00
- thumb_up 5
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.