Главная страница Случайная страница
КАТЕГОРИИ:
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
Write(M);
|
|
END.
2) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: =-(x+4)*(x+2);
End;
BEGIN
a: =-20; b: =20;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)> R)then begin
M: =t;
R: =F(t);
End;
End;
Write(M);
END.
3) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: =3*(x-2)*(x+6);
End;
BEGIN
a: =-20; b: =20;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)< R)then begin
M: =t;
R: =F(t);
End;
End;
Write(R);
END.
4) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: =(5-x)*(x+3);
End;
BEGIN
a: =-20; b: =20;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)> R)then begin
M: =t;
R: =F(t);
End;
End;
Write(R);
END.
5) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: =(x-5)*(x+3);
End;
BEGIN
a: =-5; b: =5;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)> R)then begin
M: =t;
R: =F(t);
End;
End;
Write(M);
END.
6) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: =(x+5)*(x+3);
End;
BEGIN
a: =-5; b: =5;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)> R)then begin
M: =t;
R: =F(t);
End;
End;
Write(R);
END.
7) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: =(x+7)*(1-x);
End;
BEGIN
a: =-5; b: =5;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)< R)then begin
M: =t;
R: =F(t);
End;
End;
Write(M);
END.
8) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: =(x+5)*(1-x);
End;
BEGIN
a: =-5; b: =5;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)< R)then begin
M: =t;
R: =F(t);
End;
End;
Write(M);
END.
9) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: =(x+3)*(1-x);
End;
BEGIN
a: =-5; b: =5;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)< R)then begin
M: =t;
R: =F(t);
End;
End;
Write(R);
END.
10) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: = 2*x*x + 8*x + 10;
End;
BEGIN
a: =-10; b: =10;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)< R)then begin
M: =t;
R: =F(t);
End;
End;
Write(M);
END.
11) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: = x*x + 6*x + 10;
End;
BEGIN
a: =-10; b: =10;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)> R)then begin
M: =t;
R: =F(t);
End;
End;
Write(M);
END.
12) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a, b, t, M, R: integer;
Function F(x: integer): integer;
Begin
F: = x*x - 8*x + 10;
End;
BEGIN
a: =-5; b: =5;
M: =a; R: =F(a);
for t: =a to b do begin
if (F(t)> R)then begin
M: =t;
R: =F(t);
End;
End;