Var
n,r:integer;
begin
Randomize;
n:=Random(100)+1;
Write('Дополните число ',n,' до 100: '); Read(r);
if r=100-n then Writeln('Верно!')
else Writeln('Вы ошиблись, ответ ',100-n)
end.
переделайте под питон

300

500

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

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

alikakusai35

Информатика

4,5(48 оценок)

1) a=9 b=4 b=40 a=40 не понятно что такое // у вас либо вы случайно одну лишнюю постваили и надо считать как деление или так и надо но будем считать что так и надо. тогда ответ a=40 , b=40 2)a=1120 b=43 3)a=842 b=841 4)a=344 b=0; 5) a=18 b=56