Если это Pascal то код будет выглядеть так
program test;
uses crt;
var
A,B,Q:integer;
begin
//textcolor(12); - По желанию
writeln(Введите число A:);
readln(A);
writeln(Введите число B:);
readln(B);
Q:=A*A+B*B;
writeln(Q, Ответ);
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.