Вы отправили работу на проверку эксперту. Укажите номер телефона на него придет СМС
Скачать .pdf

Ана­лиз программ с цик­ла­ми и подпрограммами

Ответами к заданиям являются слово, словосочетание, число или последовательность слов, чисел.

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: В = 20
R = F (А)
FOR Т = А ТО В *
    IF F(Т) > R THEN
        R = F(Т)
    END IF
NEXT Т
PRINT R

FUNCTION 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 IF
NEXT Т
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: В = 20
R = F (А)
FOR Т = А ТО В
    IF F(Т) < R THEN
        R = F (Т)
    END IF
NEXT Т
PRINT R

FUNCTION 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 LONG
INPUT K
I = 1
WHILE F(I) < G(K)
    I = I + 1
WEND
PRINT I

FUNCTION F(N)
    F = N * N * N
END FUNCTION

FUNCTION G(N)
    G = 2*N + 3
END FUNCTION

Python

def f(n):
    return n*n*n

def g(n):
    return 2*n+3

k = int(input())
i = 1
while f(i) < g(k):
    i+=1
print (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 LONG
INPUT К
I = 1
WHILE F(I) < G(К)
    I = I + 1
WEND
PRINT I

FUNCTION F(N)
    F = N * N * N
END FUNCTION

FUNCTION G(N)
    G = 2*N + 1
END FUNCTION

Python

def f (n) :
    return n*n*n

def g (n) :
    return 2*n+1

k = int (input())
i = 1
while f(i) < g(k):
    i+=1
print (i)

Алгоритмический язык

алг
нач
    цел i, k
    ввод k
    i : = 1
    нц пока f(i) < g (k)
        i : = i + 1
    кц
    вывод i
KOH

алг цел 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 LONG
INPUT К
I = I
WHILE F(I) < G(K)
    I = I + 1
WEND
PRINT I

FUNCTION F(N)
    F = N * N * N
END FUNCTION

FUNCTION G(N)
    G = 3*N - 2
END FUNCTION

Pyhon

def f(n):
    return n * n * n

def g(n):
    return 3 * n - 2

k = int(input())
i = 1
while f(i) < g (k) :
    i += 1
print (i)

Алгоритмический язык

алг
нач
    цел i, k
    ввод k
    i : = 1
    нц пока f(i) < g (k)
        i := i + 1
    кц
    вывод i
KOH

алг цел 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 IF
NEXT Т
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 INTEGER
INPUT Н
А = 10: В = 80
М = A: R = F (Н, А)
FOR Т = А ТО В
    IF F(H, Т) < R THEN
        М = Т
        R = F(H, Т)
    END IF
NEXT T
PRINT М

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 INTEGER
A = 5: B = 35
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 M

FUNCTION F(x)
F = 3*(x-1)*(x-1)+37
END FUNCTION

Python

def F(x):
return 3*(x-1)*(x-1)+37

a = 5
b = 35
M = a
R = 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
Ваш ответ Правильный ответ

Здесь появится результат тестовой части.

Нажмите на кнопку «Завершить работу», чтобы увидеть правильные ответы.

2 401 482
Уже готовятся к ЕГЭ, ОГЭ и ВПР.
Присоединяйся!
Мы ничего не публикуем от вашего имени
или
Ответьте на пару вопросов
Вы...
Ученик Учитель Родитель
Уже зарегистрированы?