var a,b:integer;
begin
writeln('Vvedite a,b?');
readln(a,b);
if a>b then writeln((a+b)*(a+b)) else writeln((a-b)*(a-b));
end.
Если буква кодируется одним байтом, то 8. Если двумя - только 4.
8)Г
9)Б
У тебя 9 правильно было написано, а в 8 думаю што Г
К = 0, 1 *3 = 3, 3>10 нет
к = 1, 2 * 3 = 6, 6>10 нет
к = 3, 3 * 3 = 9, 9>10 нет
к = 4, 4 *3 12, 12>10 да
Ответ: к = 4.