5. Скольким единичным отре координатного луча, чтобы удобно было отметить числа 12, 18, 24, 36? Отметьте эти числа на координатном луче. РАБОТА No 2 (5 8-10) 1. Цифры некоторых разрядов чисел 22 * и 37 е заменены звёздоч. # ками. Напишите сумму и произведение этих чисел, округлённые до своих старших разрядов. 2. На орошение поля площадью 30 га одной машине требуется 3 ч. а другой - на 2 ч больше. За какое время смогут оросить поле площадью 80 га обе машины, работая одновременно? 3. Смешали чай двух сортов: 2 кг по цене 630 р. и 3 кг по цене 950 р. Определите стоимость 1 кг смеси. 4. Вычислите: (77 609 + 427 - 209) : 236 - 589. РАБОТА N9 3 (11-17) 1. Запишите выражения для площади и периметра фигуры, изобра- жённой на рисунке 166.
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.