помогите пожалуйста нужна программа Паскаль вот задачка (При каждом переходе через
Помогите пожалуйста нужна программа Паскаль вот задачка (При каждом переходе через магический мост мужчина, имеющий b рублей, удваивает эту сумму за счет капитала черта (а рублей), сторожащего этот мост, после чего он должен оплатить черту дань в размере с рублей. Процесс этот длится до полного разорения 1-го из участников.Сколько будет совершено переходов моста?). вот блок схема пожалуйста сроочноо
Задать свой вопрос
Василиса
Значения ромбиков и остального переведи в сиволы Pascal, так к примеру ромбик-это оператор if!)))
Элина Амигуд
пробовала ни в какую я просто не умею
Анастасия Гойхбург
:(
Любовь Бомбосова
ооо
Алёна Бутонова
помогиииии упрашиваю
1 ответ
Юрик Шушко
Var a, b, c:integer;
k:integer;
begin
writeln('Vvedi kapital Cherta');
readln(a);
writeln('kapital muzhika');
readln(b);
writeln('Vvedi dan');
readln(c);
k:=1;
repeat
b:=b*2;
a:=trunc(a-b/2);
if alt;=0 then writeln('Chert razoren') else
begin
a:=a+c;
b:=b-c;
end;
if blt;=0 then writeln('Muzhik razoren') else k:=k+1;
until (alt;=0) or (blt;=0);
writeln(k);
end.
k:integer;
begin
writeln('Vvedi kapital Cherta');
readln(a);
writeln('kapital muzhika');
readln(b);
writeln('Vvedi dan');
readln(c);
k:=1;
repeat
b:=b*2;
a:=trunc(a-b/2);
if alt;=0 then writeln('Chert razoren') else
begin
a:=a+c;
b:=b-c;
end;
if blt;=0 then writeln('Muzhik razoren') else k:=k+1;
until (alt;=0) or (blt;=0);
writeln(k);
end.
Скрыпин
Андрей
можно побольше входных данных?
Никита Видонов
неа
Игорян Гайчук
с твоими входными данными, которые ты мне сбросила, у меня выходит 4
Карина Темиш
почему у меня не нолучается?
Алина Паниченко
ты на Free Pascal проверяешь?
Камилла
паскаль а б с
Мулярчик
Аринка
пробуй перед тем как компилировать сохранится
Oleg
ты разумеешь половину слов которых ты мне прислал мы их не проходили и не работали с ними и поэтому я даже примерного претставления не имею о том о чем ты разговариваешь
Семён Тимощук
хорошо, перед тем как запустить программку сохрани ее
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Облако тегов