Чему равно значение переменной aa после выполнения фрагмента алгоритма? a:= 5

b:= 18

c:= a*a + 2*b

a:= a + c

Объяснение:

1. 10

2. 12

3. 3

4. 22

5. 15

6. 34

7. 3

Часть 2

1.

Var

n:integer;

Begin

Write('Введи число ');

Readln(n);

if (n mod 2) = 0 then write(n,' чётное) else write(n,' нечётное);

End.

2.

Var

a,b:integer;

Begin

Write('Введи числа ');

Readln(a,b);

if a>b then Begin Write('a = ',b*a,' b = ',a+b) else write('a = ',a+b,' b = ',a*b);

End.

3.

Var

n:integer;

Begin

write('Введи двузначное число ');

Readln(n);

if ((n div 10) = 6) or ((n mod 10) = 6) then write('6 присутствует') else write('6 нет в этом числе');

End.

66

Объяснение:

a = 5

b = 18

c = a * a + 2 * b = 5 * 5 + 2 * 18 = 25 + 36 = 61

a = a + c = 5 + 61 = 66