Регистрация
savannah1
11.03.2021 16:11
Информатика
Есть ответ 👍

Первоначально программисты научились получать рисунки на компьютере в
режиме символьной печати. Что было единицей изображения

172
431
Посмотреть ответы 1

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

lphk02
lphk02
4,5(12 оценок)

dim a, b, t, m, r as integer

a = -20: b = 20

m = a: r = f(a)

for t = a to b

    if f(t) < r then

        m = t

        r = f(t)

    end if

next t

print r

 

function f(x)

    f : = 4*(x-5)*(x+3)

end function

var a,b,t,m,r : integer;

    function f(x: integer): integer;

    begin

        f : = 4*(x-5)*(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.

Популярно: Информатика