1) степень 2
2) степень 2
3) степень 2.
4) степень 2
Необходимо щёлкнуть ЛКМ(левой кнопкой мышью) и выбрать необходимый файл, который вам понадобился.
Var a,b,s: real;
begin
a:=5;
b:=-3.5;
s:=a+b;
s:=2*s-b;
writeln(s);
end.
ОТВЕТ
6,5
1) 458 -> 45
2) 45*2 = 90
3) 90 -> 9
4) 9*2=18
5)18*2=36
6)36*2=72
7)72->7
8)7*2=14
Var
a, b, c, d: integer;
begin
for a := 1 to 9 do
for b := 0 to 9 do
if b <> a then
for c := 0 to 9 do
if (c <> b) and (c <> a) then
for d := 0 to 9 do
if (d <> a) and (d <> b) and (d <> c) then
if a * b - c * d = a + b + c + d then
writeln(a, b, c, d);
end.