var b,i,z,k: integer;
a: array[1..10000] of integer;
begin
read(b);
z: =0;
k: =0;
while b> 0 do
z: =z+1;
a[z]: = b mod 10;
b: =b div 10;
end;
for i: =2 to z-1 do
if a[i]=a[i-1] or a[i]=a[i+1] then
k: =1;
if k=1 then writeln (‘да’)
else writeln (‘нет’);
end.
второй способ:
var a,b,c: integer;
read(a);
c: =10; // это должно быть обязательно число, но не цифра
while a > 0 do
b: =a mod 10;
a: =a div 10;
if b=c then k: =1;
c: =b;
else (‘нет’);
ответ:1.а) (2+x)•2=4+2x
б) (4х – 1)2=8x-2
е) (2х – 1)2=4x-2
в) (2х + 3у )2=4x+6y
ж) (3х – 4у)2=6x-8y
г) (х2 – 5)2=2x^2-10
з) (х2 + 5)2=2x^2+10
2.а) (5х + 2)2 – 20х=10x+4--20x=-10x+4
а) (7х – 2)2 + 28х=14x-4+28x=42x-4
б) 27х2 – 3(3х – 1)2=54-(9x+3)2=54--18x-6=-18x+48
б)32у – 2(1+8у)2=32y-(2-16y)2=32y-4+32y=64y-4
10.04
1) (х+5)2=2x+10
2) (а- 2)2=2a-4
3) (5b - 4)2=10b-8
4) (6-с)2=12-2c
5) (2х + 9)2=4x+18
6) (7m-3n)2=14m-6n
7) (b +c)2=2b+2c
8) ( х2 + y2 )22x^2+2y^2
9) (6a +7b)2=12a+14b
10) (2c -9)2=4c-18
Пошаговое объяснение:
^2 это квадраты если что
var b,i,z,k: integer;
a: array[1..10000] of integer;
begin
read(b);
z: =0;
k: =0;
while b> 0 do
begin
z: =z+1;
a[z]: = b mod 10;
b: =b div 10;
end;
for i: =2 to z-1 do
if a[i]=a[i-1] or a[i]=a[i+1] then
k: =1;
if k=1 then writeln (‘да’)
else writeln (‘нет’);
end.
второй способ:
var a,b,c: integer;
begin
read(a);
k: =0;
c: =10; // это должно быть обязательно число, но не цифра
while a > 0 do
begin
b: =a mod 10;
a: =a div 10;
if b=c then k: =1;
c: =b;
end;
if k=1 then writeln (‘да’)
else (‘нет’);
end.
ответ:1.а) (2+x)•2=4+2x
б) (4х – 1)2=8x-2
е) (2х – 1)2=4x-2
в) (2х + 3у )2=4x+6y
ж) (3х – 4у)2=6x-8y
г) (х2 – 5)2=2x^2-10
з) (х2 + 5)2=2x^2+10
2.а) (5х + 2)2 – 20х=10x+4--20x=-10x+4
а) (7х – 2)2 + 28х=14x-4+28x=42x-4
б) 27х2 – 3(3х – 1)2=54-(9x+3)2=54--18x-6=-18x+48
б)32у – 2(1+8у)2=32y-(2-16y)2=32y-4+32y=64y-4
10.04
1) (х+5)2=2x+10
2) (а- 2)2=2a-4
3) (5b - 4)2=10b-8
4) (6-с)2=12-2c
5) (2х + 9)2=4x+18
6) (7m-3n)2=14m-6n
7) (b +c)2=2b+2c
8) ( х2 + y2 )22x^2+2y^2
9) (6a +7b)2=12a+14b
10) (2c -9)2=4c-18
Пошаговое объяснение:
^2 это квадраты если что