Выбери оператор, в котором выводится на монитор степень двойки на языке программирования Python. A Print(Залж 2) B Print(4 « 0.5) с Print(8/2) D Print ( 23) SUBMIT ANSWER
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.
Uses Crt; const n=300; type V=array[1..n,1..3] of 0..5; function Cnt4(var a:V):integer; { Количество учеников со средним выше 4 } var i,j,k:integer; sb:real; begin k:=0; for i:=1 to n do begin sb:=0; for j:=1 to 3 do sb:=sb+a[i,j]; sB:=sb/3; if sb>4 then Inc(k); end; Cnt4:=k end;
var i,j:integer; M:V; begin ClrScr; Writeln('Для каждого ученика вводите через пробел три его оценки'); for i:=1 to n do begin Write(i,': '); for j:=1 to 3 do Read(M[i,j]) end; Write('Количество учеников со средним выше 4: '); Writeln(Cnt4(M),' '); ReadKey end.
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.