Аня и Маша делили одно и то же делимое на разные делители: Аня — на 2, а Маша — на 6. Аня получила в частном 9. Какое частное получила Маша?

2*9=18 Аня
18 : 6  = 3 Маша
ответ 3частное Маши

1-Согласно правилам казахской игры "Тогыз кумалак" в ней участвуют два игрока у каждого из которых на доске есть по 9 лунок( то есть всего 18 лунок, называемых "отау") расположенных друг напротив друга. Каждая лунка имеет свое название 1 - арт, 2 - тектурмас, 3 - атотпес, 4 - атсыратар, 5 - бель, 6 - бельбасар, 7 - кандыкакпан, 8 - кокмоин, 9 - мандай.2- 2 казана в 1 - 93-по жеребию или по соглашению игроков 4-Правила получения «туздык»В тогызкумалаке кроме кумалаков есть возможность один раз выиграть лунку соперника. Правила туздыка придают игре особый интерес. А также взятие туздыка дает игроку значительный перевес.5-1 раз6-слева на право7-не менее 828-начинающий9- продолжающий

2. Неполное:

If <условия>

then <действия>

Полное:

If <условия>

then <действия1>

Else <действия2>

3. б)

4. Составной оператор предназначен для объединения нескольких действий. Он имеет вид:begin  

операторы  

end;

В условном операторе составной оператор используется для описания нескольких действий: если истина — то составной оператор, если ложь то составной оператор.

Пример:

if a>o then

begin//начало составного оператора

a:=a+1;

b:=a-3;

end;//конец составного оператора

Так же принято называть составной оператор — блоком)

5 в прикрепленном

6 . Var x,a,b,c:integer;

begin

writeln ('введи трехзначное число');

readln (x);

c:=x mod 10;

b:=x div 10 mod 10;

a:=x div 100 mod 10;

if a=с then writeln ('Число является перевертышем')

else writeln ('число не является перевертышем');

if (a=b) or (a=c) or (b=c) then writeln ('да')

else writeln ('нет');

end.

7. var x1,x2,y1,y2:integer;

                     a,b:real;

 begin

 write ('Введите x1 и x2: ');

 readln (x1,x2);

 write ('Введите y1 и y2: ');

 readln (y1,y2);

 a:=sqrt (sqr (x1) + sqr (y1));

 b:=sqrt (sqr (x2) + sqr (y2));

 if a>b then writeln ('1-я точка ближе')

 else writeln ('2-я точка ближе');

 end.

8. Var a ,b,c :real;

Begin

Writeln (‘введите три числа’);

Readln (a,b,c);

If (a<b+c) and (b<a+c)and(c<a+b) then  

Begin  

If (a=b) and (a=c)and (b=c) then Writeln (‘ треугольник равносторонний’)

Else begin  

If (a=b)or(a=c)or(b=c) then Writeln (‘треугольник равнобедренный’)

Else Writeln (‘треугольник разносторонней’);

End;

End

Else Writeln (‘треугольника с заданным сторонами не существует’);

End.

Объяснение: