Регистрация
zaharovivan150
06.09.2020 18:53
Информатика
Есть ответ 👍

5. для каких целей используется метод erde'n' и функции рrt​

216
332
Посмотреть ответы 1

Ответы на вопрос:

Sonyavishnya
Sonyavishnya
4,8(61 оценок)
Begin writeln('введите имя игрока '); var name : = readstring; writeln('введите сумму '); var sum : = readinteger; while true do begin writeln('введите ставку от ', 1, ' до ', sum); var stavka : = readinteger; if stavka > sum then writeln('ставка не может превышать имеющиеся наличные') else begin sum -= stavka; writeln('введите число от 1 до 36'); var number : = random(1, 36); var getnumber : = readinteger; if (getnumber < 1) or (getnumber > 36) then writeln('неверное число. вы потеряли ставку! ') else if number = getnumber then begin writeln('вы угадали! вы получаете 36х ставку'); sum += (36 * stavka); end else writeln('не угадали. вы потеряли ставку! ') end; writeln; writeln('имя игрока ', name); writeln('текущие деньги ', sum); writeln; if (sum < = 0) then begin writeln(name, ' , вы проиграли! надеюсь, вам повезет в следующий раз'); break; end; end; end.

Популярно: Информатика