Клоун предложил каждому из публики задумать число. Потом он сказал: «Прибавьте к задуманному числу 5. Теперь из результата вычтите 2. А теперь к результату прибавьте 7». Потом клоун спросил у желающих, какое число у каждого из них получилось. Услышав ответ, он немедленно объявлял каждому, какое число тот задумывал. Составьте программу, которая повторяла бы фокус клоуна (пользователь называет число, а программа угадывает, какое число было задумано). решить как в паскаль пж
Программа на Pascal:
program ClownMagic;var
number, guessedNumber: integer;
begin
writeln′Задумайтечисло′'Задумайте число'′Задумайтечисло′;
readlnnumbernumbernumber;
guessedNumber := number+5−2+7number + 5 - 2 + 7number+5−2+7 - number;
writeln′Клоунугадал,вызадумаличисло:′,guessedNumber'Клоун угадал, вы задумали число: ', guessedNumber′Клоунугадал,вызадумаличисло:′,guessedNumber;
end.
Программа просит пользователя задумать число, а затем угадывает это число, применяя шаги, описанные в задании клоуна.