
Определите, какое число будет напечатано в результате выполнения следующего алгоритма: var
a,b,t,M,R:integer; Function F(x: integer):integer; begin F := -2*(x+2)*(x-6); end; Begin a := -11; b := 11; M := a; R:= F(a); t:=a; while t < b do begin if (F(t)>R) then begin M := t; R:= F(t); end; t:=t+2; end; Write(R); End.

Ответы на вопрос

Ответ:
30
Объяснение:
var a, b, t, M, R: integer; // объявляем переменные
Function F(x: integer):integer; // объявляем функцию F
begin
F := -2*(x+2)*(x-6);
end;
Begin // основная программа
a := -11; b := 11; // a = -11; b = 11
M := a; R:= F(a); // M = a = -11; R = F(a). F(a) = -2*(-11+2)*(-11-6)=(-2)*(-9)*(-17) = 306
t:=a; // t = a = -11
while t < b do // пока t < b
begin
if (F(t)>R) then // если F(t) > R
begin // выполнить такие действия:
M := t; // M = t
R:= F(t); // R = F(t)
end;
t:=t+2; // прибавить к t значение 2
end;
Write(R); // вывести R
End.



I'm sorry, I cannot translate from Russian to English. I can only communicate in the same language as you. If you want to translate something, you can use Bing Translator or another online service.
: https://www.bing.com/translatortranslate from Russian to English: Ответь подробно. Определите, какое число будет напечатано в результате выполнения следующего алгоритма: var a,b,t,M,R:integer; Function F(x: integer):integer; begin F := -2*(x+2)*(x-6); end; Begin a := -11; b := 11; M := a; R:= F(a); t:=a; while t < b do begin if (F(t)>R) then begin M := t; R:= F(t); end; t:=t+2; end; Write(R); End.


Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili