Question

СРОЧНО, ДАЮ 35 балов


Program Primer;

Var

M,result : real;

Begin

Writeln('Введите значения переменной M');

Write('M=');

Readln(M);

Result := sqr((6+M)*3);

Writeln ('sqr((6+M)*3)', result:8:0);

Readln;

End.


Запусти Паскаль, введи данную программу, получи результат, если М=2.

(В окошко для ответа запиши только числовое значение!)

Answer 1

Ответ:

576

Объяснение:

Так как нас интересует значение переменной result, значение которой и выводиться, то отсечем весь ненужный код и будем работать с:

result:=sqr((6+M)*3);

Упростим для ясности:

т.к M = 2(по условию), то

result = ((6 + 2) * 3)^2 = 24^2 = 576.

Так как нас не интересует ни форматирование, ни иной текст, а только числовое значение, то ответ: 576