6aPaLlJek

05.09.2021 18:25

Информатика

Есть ответ 👍

Синформатикой по теме подпрограммы-функции в паскале!
желательно с решением!
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;

write(r);

end.

vlad1417

Информатика

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

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

Объяснение:

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

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

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

Задай свой вопрос

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

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

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

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

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

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

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