Предмет: Информатика,
автор: Maria988848
Помогите, пожалуйста, написать программу по информатике!
Определить сколько можно купить арбузов за 1000 рублей.
Цена арбуза (1кг) - 15 руб.,
Вес (Random, Т.е. программа с Randomize) - от 2 до 8 кг.
Желательно, чтобы программа была правильной, если сверятся с помощью программы Паскаля.
(программу писать на языке Паскаля)
NickCantBeEmpty:
Вес для каждого арбуза рандомный или все они весят одинаково, просто этот вес с каждым запуском программы меняется?
Ээээ, я так поняла для каждого арбуза рандомный
или погоди
нет, каждый рандомный
понял, ща все будет
Ответы
Автор ответа:
0
var a,b,c:integer;
begin
c:=0;
while b<1000 do begin
c:=c+1;
a:=random(2,8);
b:=b+a*15;
if b>1000 then
c:=c-1;
end;
writeln('можно купить ',c,' ШТ')
end.
Автор ответа:
0
Что-то вроде такого? Раз для каждого вес рандомный
Приложения:
А что такое break?
Прерывание цикла. Если сумма вместе со стоимостью "нового" арбуза превышает 1000р, то этот арбуз не засчитывается, а с помощью команды break цикл завершается, после чего происходит вывод результата.
Интересные вопросы
Предмет: Русский язык,
автор: 999tasha
Предмет: Русский язык,
автор: milenamilena2002
Предмет: Английский язык,
автор: 502танюша502
Предмет: Английский язык,
автор: beatrisagalkinа
Предмет: Математика,
автор: Анд555соб