Склад
Пошаговое объяснение:
Поскольку по условию задачи кубики одинаковые, чтобы найти букву, повернутую к Шпуле, можно анализировать другие кубики.
Начну с нижнего кубика и пойду вверх.
1) Нам нужна буква, находящаяся на кубике слева от К. Это буква С, что можно заметить на третьем кубике.
2) Тут нужна буква, находящаяся на кубике снизу А. Это буква К, что видно по нижнему кубику.
3) Нужна буква, находящаяся снизу К. Это буква Л, что заметно по верхнему кубику.
4) Нужна буква справа от Д. Это А, что видно на втором снизу кубике.
5) Нужна буква, нахожящаяся снизу Л. Это буква Д, что видно на втором сверху кубике.
var
a,b: integer;
begin
writeln('Введите число: ');
readln(a);
if a >12
then
begin
b:=Sqr(a);
Writeln('Получилось чилсо: ', b);
end
else
begin
b:=a-37;
Writeln('Получилось чилсо: ', b);
end;
end.