Хелпикс

Главная

Контакты

Случайная статья





Разобрать задание по прикрепленному видео: 24. Задание 21 № 15989



4) Разобрать задание по прикрепленному видео: 24. Задание 21 № 15989

Какое число будет напечатано в результате работы следующей программы? Для Вашего удобства программа приведена на пяти языках программирования.

 

 

Паскаль Алгоритмический язык
var a, b, t, M, R: integer;   function F(x: integer): integer; begin f:=abs(abs(x−6)+abs(x+6)−16)+2; 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.   алг нач цел a, b, t, M, R a := −20; b := 20 M := a; R := F(a) нц для t от a до b если F(t) <= R то M := t; R := F(t) все кц вывод M + R кон   алг цел f(цел x) нач знач:=abs(abs(x−6)+abs(x+6)−16)+2 кон  

Решить задание самостоятельно:

5) Разобрать задание по прикрепленному видео:

Решить задание самостоятельно:

2. Задание 21

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

 

 

Паскаль Алгоритмический язык
var a,b,t,M,R :longint; Function F(x:integer):integer; begin F := 2*(x*x-9)*(x*x-9)+9; end; BEGIN a := -10; 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. алг нач цел a, b, t, M, R a := -10; b := 20 M := a; R := F(a) нц для t от a до b если F(t) <= R то M := t; R := F(t) все кц вывод M*R кон алг цел F(цел x) нач знач := 2*(x*x-9)*(x*x-9)+9 кон

 


6) Разобрать задание по прикрепленному видео:

Решить задание самостоятельно:

5. Задание 21

Напишите в ответе наименьшее значение входной переменной k, при котором программа выдаёт ответ 23. Для Вашего удобства программа приведена на пяти языках программирования.

 

Паскаль Алгоритмический язык
var k, i : longint;   function f(n: longint) : longint; begin f := n * n * n; end; function g(n: longint) : longint; begin g:= n * n; end; begin readln(k); i := 1; while f(i) < g(i) * k i := i+1; writeln(i) end. алг нач цел i, k ввод k i := 1 нц пока f(i) < g(i) * k i := i + 1 кц вывод i все кон алг цел f(цел n) нач знач := n * n * n кон алг цел g(цел n) нач знач := n * n кон

 

7) Разобрать задание по прикрепленному видео:

Решить задание самостоятельно:

Задание 21

Определите, какое число будет напечатано в результате выполнения следующего алгоритма:

 

Бейсик Паскаль
DIM A, B, T, M, R AS INTEGER A =-5: B = 5 M = A: R = F(А) 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 = (x+3)*(1-x) END FUNCTION var a,b,t,M,R: integer; Function F(x:integer): integer; begin F := (x+3)*(1-x) 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(R) end.

 



  

© helpiks.su При использовании или копировании материалов прямая ссылка на сайт обязательна.