Question

Какое значение будет иметь переменная р после выполнения программы, если
с клавиатуры введено число 7?
Program Primer1;
var a, b, p: integer;
Begin
writeln (‘Введите a’);
readln (a);
if (a>=7)
then begin
b:=3;
p:=a*a+b*b;
end
Else begin
b:=5;
p:=(a+b)*(a+b);
end;
writeln (‘ p=’, p);
End.

Answer 1

P = 58, так как в условии сказано что если а больше или равно 7, то надо присвоить b число 3, соответственно p = a*a+b*b(p = 7*7 + 3*3)