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.
ответ Сумма приближённо равна -2,43; разность -22,67; произведение -127,0 или -127.
Пошаговое объяснение: 1). -12,546 с точностью до 0,01 = -12,55, потому что после разряда сотен стоит цифра 6, которая больше 5.
10, 123 с точностью до 0,01 = 10,12, так как после разряда сотен стоит цифра 3, а она меньше 5.
2). Ищем сумму. a+b = -12,55+10,12= -2,43. Так как это числа с разными знаками, и модуль отрицательного числа больше, нужно поставить минус и из большего модуля вычесть меньший)
3). Ищем разность. a-b= -12.55-10,12=22,67. Здесь оба числа со знаком минус, поэтому нужно поставить их общий знак и сложить модули).
4). Сначала умножим -12,55 на 10,12 , получим -127,006. Поскольку мы умножали числа с разными знаками, нужно поставить минус и умножить их модули). Затем результат нужно округлить то той же значащей цифры, что и множители. Округляем число -127,006 до четвёртой значащей цифры и получаем -127,0 или просто -127.
ответ:24 хвилини
Пошаговое объяснение:
4 1/2 * 2/3= 9/2 * 2/3=3(км/год)-швидкість Ігора
4 1/2 +3=7 1/2(км/год)- швидкість віддалення
3 : 7 1/2= 3 : 15/2= 3* 2/15=2/5(год)=
=60хв *2/5=24 хвилини