Есть ответ 👍

Синформатикой по теме подпрограммы-функции в паскале!
желательно с решением!
1)определите, какое число будет напечатано в результате выполнения следующего
алгоритма:
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.

2) определите, какое число будет напечатано в результате выполнения следующего
алгоритма:
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.

3) определите, какое число будет напечатано в результате выполнения следующего
алгоритма:
var a,b,t,m,r: integer;
function f(x: integer): integer;
begin
f: = abs(x-5) + abs(x+5) - 3;
end;
begin
a: =-20; b: =20;
m: =a; r: =f(a);
for t: =a to b do begin
if (f(t) m: =t;
r: =f(t);
end;
end;
write(m+r);
end.

4)определите, какое число будет напечатано в результате выполнения следующего
алгоритма:
var a,b,t,m,r: integer;
function f(x: integer): integer;
begin
f : = abs(x-7)+abs(x+7) - 16
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+r);
end.

206
481
Посмотреть ответы 2

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

Lyadavinchi
4,6(63 оценок)

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.

vlad1417
4,6(17 оценок)

это светотехника

Объяснение:

от слова рампа я думаю

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

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

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS