Анализ программ с циклами и подпрограммами Ответами к заданиям являются слово, словосочетание, число или последовательность слов, чисел. 1 1 Определите, какое целое значение Н нужно ввести, чтобы число, напечатанное в результате выполнения следующего алгоритма, было наибольшим. Если таких значений несколько, то в ответ запишите минимальное из них. Для удобства алгоритм представлен на четырёх языках программирования. Бейсик DIM А, В, Т, М, R, Н AS INTEGER INPUT НА = -20: В = 40 М = A: R = F (Н, А)FOR Т = А ТО В IF F (Н, Т) < R THEN М = Т R = F (Н, Т) END IF NEXT Т PRINT МFUNCTION F (Н, x) F = (x - 10) * (x - H)END FUNCTION Паскаль var a, b, t, M, R, H: integer; function F(H, x: integer): integer; begin F := (x - 10) * (x - H) ; end; begin readln(H); a := -20; b := 40; M := a; R : = F (H, a) ; for t := a to b do begin if (F(H, t) < R) then begin M := t; R := F(H, t) end end;write(M) end. Си #include<stdio.h> int F(int H, int x){ return (x - 10) * (x - H);}void main(){ int a, b, t, M, R, H; scant("%d", &H); a = -20; b = 40; M = a; R = F (H, a); for (t = a; t <= b; t++){ if (F (H, t) < R) { M = t; R = F (H, t); } } printf("%d", M);} Алгоритмический язык нач цел a, b, t, R, M, H ввод H a := -20; b := 40 M := a; R := F(H, a) нц для t от а до b если F(H, t) < R то M := t; R := F(H, t) все кц вывод M коналг цел F(цел Н, х) нач знач := (х - 10) * (х - Н) кон 2 2 Определите, какое число будет напечатано в результате выполнения следующего алгоритма (для Вашего удобства алгоритм представлен на четырёх языках программирования). Бейсик DIM А, В, Т, R AS INTEGERА = -20: В = 20R = F (А)FOR Т = А ТО В * IF F(Т) > R THEN R = F(Т) END IFNEXT ТPRINT RFUNCTION F (x) F = -4 * (x + 2) * (x - 2)END FUNCTION Паскаль var a, b, t, R: integer;function F(x: integer): integer;begin F := -4 * (x + 2) * (x - 2) ;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 -4 * (х + 2) * (х - 2);}void main(){ int a, 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);} Алгоритмический язык нач цел a, b, t, R а := -20; b := 20 R: = F(а) нц для t от а до b если F(t) > R то R := F(t) все кц вывод Rконалг цел Р(цел х)нач знач := -4 * (х + 2) * (х - 2)кон 3 3 Определите, какое число будет напечатано в результате выполнения следующего алгоритма (для Вашего удобства алгоритм представлен на четырёх языках программирования). Бейсик DIM А, В, Т, М, R AS INTEGERА = -20: В - 20М = A: R = F (А)FOR Т = А ТО В IF F(Т) < R THEN М = Т R = F (Т) END IFNEXT ТPRINT МFUNCTION F (x) F = -3 * (x + 2) * (x - 6)END FUNCTION Паскаль var a, b, t, M, R: integer;function F(x: integer): integer;begin F := -3 * (x + 2) * (x - 6);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);end. Си int F(int х){ return -3 * (х + 2) * (х - 6);}void main(){ int a, b, t, M, R; a = -20; b = 20; M = a; R = F (a) ; for (t = a; t <= b; t++){ if (F (t) < R) { M = t; R = F (t) ; } }printf("%d", M) ;} Алгоритмический язык нач цел а, b, t, М, R а := -20; b := 20 М := a; R := F(a) нц для t от а до b если F(t) < R то М := t; R := F(t) все кц вывод Мконалг цел F(цел х)нач знач := -3 * (х + 2) * (х - 6)кон 4 4 Определите, какое число будет напечатано в результате выполнения следующего алгоритма (для Вашего удобства алгоритм представлен на четырёх языках программирования). Бейсик DIM А, В, Т, R AS INTEGERА = -20: В = 20R = F (А)FOR Т = А ТО В IF F(Т) < R THEN R = F (Т) END IFNEXT ТPRINT RFUNCTION 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)кон 5 5 Напишите в ответе наименьшее значение входной переменной k, при котором программа выдаёт тот же ответ, что и при входном значении k = 10. Для Вашего удобства программа приведена на пяти языках программирования. Бейсик DIM K, I AS LONGINPUT KI = 1WHILE F(I) < G(K) I = I + 1WENDPRINT IFUNCTION F(N) F = N * N * NEND FUNCTIONFUNCTION G(N) G = 2*N + 3END FUNCTION Python def f(n): return n*n*ndef g(n): return 2*n+3k = int(input())i = 1while f(i) < g(k): i+=1print (i) Алгоритмический язык алгнач цел i, k ввод k i := 1 нц пока f(i) < g(k) i := i + 1 кц вывод iконалг цел f(цел n)нач знач := n * n * nконалг цел g(цел n)нач знач := 2*n + 3кон Паскаль var k, i : longint;function f(n: longint): longint;begin f := n * n * n;end;function g(n: longint): longint;begin g := 2*n + 3;end;begin readln(k); i := 1; while f(i) < g(k) do i := i+1; writeln(i)end. Си #include<stdio.h>long f(long n) { return n * n * n;}long g(long n) { return 2*n + 3;}int main(){ long k, i; scanf("%ld", &k); i = 1; while(f(i)<g(k)) i++; printf("%ld", i); return 0;} 6 6 Напишите в ответе наибольшее значение входной переменной k, при котором программа выдаёт тот же ответ, что и при входном значении k = 49. Для Вашего удобства программа приведена на пяти языках программирования. Бейсик DIM К, I AS LONGINPUT К I = 1WHILE F(I) < G(К) I = I + 1WEND PRINT IFUNCTION F(N) F = N * N * NEND FUNCTIONFUNCTION G(N) G = 2*N + 1END FUNCTION Python def f (n) : return n*n*ndef g (n) : return 2*n+1k = int (input()) i = 1while f(i) < g(k): i+=1print (i) Алгоритмический язык алгнач цел i, k ввод k i : = 1 нц пока f(i) < g (k) i : = i + 1 кц вывод iKOHалг цел f(цел n)нач знач := n * n * nконалг цел g(цел n)нач знач := 2*n + 1кон Паскаль var k, i : longint;function f(n: longint): longint;begin f : = n * n * n; end; function g(n: longint): longint;begin g : = 2 * n + 1; end; begin readln(k); i := 1; while f(i) < g(k) do i : = i +1; writeln(i)end. Си #include <stdio.h>long f (long n) { return n * n * n;}long g (long n) { return 2*n + 1;}int main(){ long k, i; scant("%ld", &k); i = 1; while(f(i)<g(k))" i + + ; printf("%ld", i); return 0;{ 7 7 Напишите в ответе наименьшее значение входной переменной k, при котором программа выдаёт тот же ответ, что и при входном значении k = 20. Для Вашего удобства программа приведена на пяти языках программирования. Бейсик DIM К, I AS LONGINPUT КI = IWHILE F(I) < G(K) I = I + 1WEND PRINT IFUNCTION F(N) F = N * N * NEND FUNCTIONFUNCTION G(N) G = 3*N - 2END FUNCTION Pyhon def f(n): return n * n * ndef g(n): return 3 * n - 2k = int(input()) i = 1while f(i) < g (k) : i += 1print (i) Алгоритмический язык алгнач цел i, k ввод k i : = 1 нц пока f(i) < g (k) i := i + 1 кц вывод iKOHалг цел f(цел n)нач знач := n * n * nконалг цел g(цел n)нач знач := 3 * n - 2кон Паскаль var k, i : longint;function f(n: longint): longint;begin f : = n * n * n;end;function g(n: longint): longint;begin g := 3 * n - 2;end;begin readln(k); i : = 1; while f(i) < g(k) do i : = i + 1; writeln(i)end. Си #include<stdio.h> long f (long n) { return n * n * n;}long g(long n) { return 3 * n - 2;}int main(){ long k, i; scant("%ld", &k); i = 1; while (f (i) < g (k) ) i + +; printf("%ld", i); return 0;} 8 8 Определите, какое число будет напечатано в результате выполнения следующего алгоритма (для Вашего удобства алгоритм представлен на четырёх языках программирования). Бейсик DIM А, В, Т, М, R AS INTEGERА = -20: В = 20М = A: R = F(А)FOR Т = А ТО В IF F(Т) < R THEN М = Т R = F (Т) END IFNEXT ТPRINT МFUNCTION F (x) F = 4 * (x + 2) * (x - 4)END FUNCTION Алгоритмический язык нач цел a, b, t, М, R а := -20; b := 20 М := a; R:= F(a) нц для t от а до b если F(t) < R то М := t; R := F(t) все кц вывод Мконалг цел F(цел х)нач знач := 4*(х + 2)*(х ~ 4)кон Паскаль var a, b, t, M, R: integer;function F(x: integer): integer; begin F := 4 * (x + 2) * (x - 4) ; 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); end. Си int F(int х){return 4 * (х + 2) * (х - 4);}void main(){ int a, b, t, M, R; a = -20; b = 20; M = a; R = F(a) ; for (t = a; t <= b; t++){ if (F(t) < R) { M = t; R = F (t) ; } } printf("%d", M);} 9 9 Определите, какое целое значение Н нужно ввести, чтобы число, напечатанное в результате выполнения следующего алгоритма, было наименьшим. Если таких значений несколько, то в ответ запишите максимальное из них. Для удобства алгоритм представлен на четырёх языках программирования. Бейсик DIM А, В, Т, М, R, Н AS INTEGERINPUT НА = 10: В = 80М = A: R = F (Н, А)FOR Т = А ТО В IF F(H, Т) < R THEN М = Т R = F(H, Т) END IFNEXT TPRINT МFUNCTION F(Н, х) F = (х - 30) * (х - H) END FUNCTION Паскаль var a, b, t, M, R, H: integer;function F(H, x: integer): integer;begin F := (x - 30) * (x - H) ;end;begin readln(H); a := 10; b := 80; M := a; R := F(H, a); for t := a to b do begin if (F(H, t) < R) then begin M := t; R := F(H, t) end end; write(M) end. Си #include<stdio.h> int F(int H, int x){ return (x - 30) * (x - H);}void main(){ int a, b, t, M, R, H; scant("%d", &H); a = 10; b = 80; M = a; R = F (H, a); for (t = a; t <= b; t++){ if (F(H, t) < R) { M = t; R = F (H, t); } } printf("%d", M);} Алгоритмический язык нач цел а, b, t, R, М, Н ввод Н а := 10; b := 80 М := a; R := F (Н, а) нц для t от а до b если F(H, t) < R то М := t; R := F(H, t) все кцвывод М коналг цел F(цел Н, х) нач знач := (х - 30) * (х - Н)кон 10 10 Напишите в ответе число, которое будет напечатано в результате выполнения следующего алгоритма (для Вашего удобства алгоритм представлен на пяти языках программирования). Бейсик DIM A, B, T, M, R AS INTEGERA = 5: B = 35M = A: R = F(A)FOR T = A TO B IF F(T) > R THEN M = T R = F(T) END IFNEXT TPRINT MFUNCTION F(x) F = 3*(x-1)*(x-1)+37END FUNCTION Python def F(x): return 3*(x-1)*(x-1)+37a = 5b = 35M = aR = F(a)for t in range(a, b+1): if F(t) > R: M = t R = F(t)print (M) Алгоритмический язык алгнач цел a, b, t, M, R a := 5; b := 35 M := a; R := F(a) нц для t от a до b если F(t) > R то M := t; R := F(t) все кц вывод Mконалг цел F(цел x)нач знач := 3*(x-1)*(x-1)+37кон Паскаль var a,b,t,M,R :integer;Function F(x:integer):integer; begin F := 3*(x-1)*(x-1)+37 end; begin a := 5; b := 35; 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. Си #include<stdio.h>int F(int x){ return 3*(x-1)*(x-1)+37;}void main(){ int a, b, t, M, R; a = 5; b = 35; M = a; R = F(a); for (t = a; t <= b; t++) { if (F(t) > R) { M = t; R = F(t); } } printf("%d", M);} 0 из 10 № Ваш ответ Правильный ответ Здесь появится результат тестовой части. Нажмите на кнопку «Завершить работу», чтобы увидеть правильные ответы. Завершить работу