Вопрос не корректен к вашему сведению
После слова begin:
Переменной s присвоено значение 0.
Дальше идет цикл, повторяющийся 7 раз для значений k: 6,7,8, ... ,12
При каждом проходе цикла переменная s увеличивается на 10, т.е в результате она увеличится на 7 * 10 = 70.
Т.к. в начале она была равна 0, то в конце ее значение будет 0 + 70 = 70.
Задание №1
3 × 3 = 9 // умножить на 3
9 + 2 = 11 // прибавить 2
11 × 3 = 33 // умножить на 3
33 + 2 = 35 // прибавить 2
35 + 2 = 37 // прибавить 2
Ответ: 12122
Задание №2
Если 11221 из числа 11 делает число 118, можно записать как:
Команда 22 из числа 13 делает число 117.
Таким числом является 3.
13 × 3 = 39
39 × 3 = 117
Ответ: 3
Задание №3
Если 21212 из числа 11 делает число 130, можно записать как:
Команда 121 из числа 22 делает число 65.
Таким числом является 7.
22 + 7 = 29
29 × 2 = 58
58 + 7 = 65
Ответ: 7
Var a, b: longint;
begin
write ('введите число -> ');
readln (a);
a:=a mod 10;
b:=(a*a) mod 10;
writeln ('последняя цифра квадрата числа -> ',b);
<span>end.</span>