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

Бейсик

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

FUNCTION F (x)
    F = 5 * (x + 3) * (x - 3)
END FUNCTION

Паскаль

var a, b, t, R: integer;
function F(x: integer): integer;
begin
    F := 5 *(x + 3) * (x - 3);
end;

begin
    a := -20; b := 20;
    R := F(a);
    for t := a to b do
    begin
        if (F(t) < R) then begin
            R := F(t); 
        end; 
    end;
write(R); 
end.

Си

int F(int х)
{
    return 5 *(х + 3)*(х - 3);
}

void main()
{
    int а, b, t, R;
    a = -20; b = 20;
    R = F (a) ;
    for (t = a; t <= b; t++) {
        if (F(t) < R) {
            R = F(t) ;
        }
    }
printf("%d", R);
}

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

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

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