Определите, какое число будет напечатано в результате выполнения следующего алгоритма (для Вашего удобства алгоритм представлен на четырёх языках программирования).

Бейсик

DIM А, В, Т, М, R AS INTEGER
А = -20: В - 20
М = A: R = F (А)
FOR Т = А ТО В
	IF F(Т) < R THEN
		М = Т
		R = F (Т)
	END IF
NEXT Т
PRINT М

FUNCTION F (x)
	F = -3 * (x + 2) * (x - 6)
END FUNCTION

Паскаль

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(M);
end.

Си

int F(int х)
{
	return -3 * (х + 2) * (х - 6);
}
void main()
{
	int a, b, t, M, R;
	a = -20; b = 20;
	M = a; R = F (a) ;
	for (t = a; t <= b; t++){
		if (F (t) < R) {
			M = t; R = F (t) ;
		}
	}
printf("%d", M) ;
}

Алгоритмический язык

нач
	цел а, b, t, М, R
	а := -20; b := 20
	М := a; R := F(a)
	нц для t от а до b
		если F(t) < R то
			М := t; R := F(t)
		все
	кц
	вывод М
кон

алг цел F(цел х)
нач
	знач := -3 * (х + 2) * (х - 6)
кон