Даны положительные числа А и В (А>В). На отрезке длины А размещено максимально возможное количество отрезков длины В (без наложений). Не используя операции умножения и деления, найти длину незанятой части отрезка А.
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017 // Внимание! Если программа не работает, обновите версию!
function Res(a:integer;op:char;b:integer):integer; begin case op of '+':Result:=a+b; '-':Result:=a-b; '*':Result:=a*b; '/':Result:=a div b end end;
begin var s:=ReadlnString('Вводите:'); var p:=s.Matches('(((\-)?\d+)|[\+\-\*\/])').ToArray; if p.Count<>5 then Writeln('Ошибка!') else begin var op1:=p[1].Value[1]; var op2:=p[3].Value[1]; var a:=p[0].Value.ToInteger; var b:=p[2].Value.ToInteger; var c:=p[4].Value.ToInteger; if (op1 in ['+','-']) and (op2 in ['*','/']) then Writeln('='+Res(Res(b,op2,c),op1,a)) else Writeln('='+Res(Res(a,op1,b),op2,c)) end end.
Гра́фика (др.-греч. γρᾰφικός «письменный» от γράφω «записывать, писать») — вид изобразительного искусства, в котором в качестве основных изобразительных средств, называемых графическими, используются свойства изобразительной поверхности (чаще белого листа бумаги) и тональные отношения линий, штрихов и пятен.
2)это графического представления алгоритма, в котором шаги изображаются в виде блоков различной формы, соединенных между собой стрелками.
3)Спрайт (англ. Sprite — фея; эльф): Спрайт — вид грозовых разрядов, бьющих в мезосфере и термосфере. Спрайт — графический объект в компьютерной графике. Спрайт — безалкогольный газированный напиток производства The Coca-Cola
4)Всегда, когда щелкнут по флажку, повторить..., когда я получу, передать сообщение, касается...,
идти 10 шагов, повернуться в направлении, скрыть переменную, показать переменную, когда клавиша... нажата.
// Внимание! Если программа не работает, обновите версию!
function Res(a:integer;op:char;b:integer):integer;
begin
case op of
'+':Result:=a+b;
'-':Result:=a-b;
'*':Result:=a*b;
'/':Result:=a div b
end
end;
begin
var s:=ReadlnString('Вводите:');
var p:=s.Matches('(((\-)?\d+)|[\+\-\*\/])').ToArray;
if p.Count<>5 then Writeln('Ошибка!')
else begin
var op1:=p[1].Value[1];
var op2:=p[3].Value[1];
var a:=p[0].Value.ToInteger;
var b:=p[2].Value.ToInteger;
var c:=p[4].Value.ToInteger;
if (op1 in ['+','-']) and (op2 in ['*','/']) then
Writeln('='+Res(Res(b,op2,c),op1,a))
else Writeln('='+Res(Res(a,op1,b),op2,c))
end
end.
Примеры
Вводите: -4--3--2
=1
Вводите: 12*3+45
=81
Вводите: 45+12*3
=81
Вводите: -26/13--5
=3
Гра́фика (др.-греч. γρᾰφικός «письменный» от γράφω «записывать, писать») — вид изобразительного искусства, в котором в качестве основных изобразительных средств, называемых графическими, используются свойства изобразительной поверхности (чаще белого листа бумаги) и тональные отношения линий, штрихов и пятен.
2)это графического представления алгоритма, в котором шаги изображаются в виде блоков различной формы, соединенных между собой стрелками.
3)Спрайт (англ. Sprite — фея; эльф): Спрайт — вид грозовых разрядов, бьющих в мезосфере и термосфере. Спрайт — графический объект в компьютерной графике. Спрайт — безалкогольный газированный напиток производства The Coca-Cola
4)Всегда, когда щелкнут по флажку, повторить..., когда я получу, передать сообщение, касается...,
идти 10 шагов, повернуться в направлении, скрыть переменную, показать переменную, когда клавиша... нажата.