Варианты заданий
Версия для печати и копирования в MS Word
1
Тип Д21 № 18502
i

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

 

Бей­сикPython

DIM A, B, T, M, R AS INTEGER

A = -9: B = 9

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+R

 

FUNCTION F(x)

    IF X>0 THEN

        F = (x-10)*(x-10) + 9

    ELSE

        F = (x-2)*(x-2) + 6

    END IF

END FUNCTION

def F(x):

    if x>0:

        return (x-10)*(x-10) + 9

    else:

        return (x-2)*(x-2) + 6

a=-9; b=9

M=a; R=F(a)

for t in range(a,b+1):

    if F(t) <= R:

        M=t; R=F(t)

print(M+R)

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

var a, b, t, M, R :integer;

function F(x:integer):integer;

    begin

        if x>0

            then F := (x-10)*(x-10) + 9

            else F := (x-2)*(x-2) + 6

    end;

begin

    a := -9; b := 9;

    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 := -9; b := 9

    M := a; R := F(a)

    нц для t от a до b

        если F(t) <= R

        то M := t; R := F(t)

        все

    кц

    вывод M+R

кон

алг цел F(цел x)

нач

    если x>0

        то знач := (x-10)*(x-10) + 9

        иначе знач := (x-2)*(x-2) + 6

    все

кон

 

С++

#include <iostream>

using namespace std;

int F(int x)

{

    if (x>0)

        return (x-10)*(x-10) + 9;

    else

        return (x-2)*(x-2) + 6;

}

 

int main()

{

    int a, b, t, M, R;

    a = -9; b = 9;

    M = a; R = F(a);

    for (t=a; t<=b; ++t) {

        if (F(t) <= R) {

            M = t; R = F(t);

        }

    }

    cout << M+R;

    return 0;

}


Аналоги к заданию № 18502: 18633 Все


2
Тип Д21 № 18633
i

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

 

Бей­сикPython

DIM A, B, T, M, R AS INTEGER

A = -9: B = 9

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+R

 

FUNCTION F(x)

    IF X>0 THEN

        F = (x-10)*(x-10) + 6

    ELSE

        F = (x-2)*(x-2) + 3

    END IF

END FUNCTION

def F(x):

    if x>0:

        return (x-10)*(x-10) + 6

    else:

        return (x-2)*(x-2) + 3

a=-9; b=9

M=a; R=F(a)

for t in range(a,b+1):

    if F(t) < R:

        M=t; R=F(t)

print(M+R)

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

var a, b, t, M, R :integer;

function F(x:integer):integer;

    begin

        if x>0

            then F := (x-10)*(x-10) + 6

            else F := (x-2)*(x-2) + 3

    end;

begin

    a := -9; b := 9;

    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 := -9; b := 9

    M := a; R := F(a)

    нц для t от a до b

        если F(t) < R

        то M := t; R := F(t)

        все

    кц

    вывод M+R

кон

алг цел F(цел x)

нач

    если x>0

        то знач := (x-10)*(x-10) + 6

        иначе знач := (x-2)*(x-2) + 3

    все

кон

 

С++

#include <iostream>

using namespace std;

int F(int x)

{

    if (x>0)

        return (x-10)*(x-10) + 6;

    else

        return (x-2)*(x-2) + 3;

}

 

int main()

{

    int a, b, t, M, R;

    a = -9; b = 9;

    M = a; R = F(a);

    for (t=a; t<=b; ++t) {

        if (F(t) < R) {

            M = t; R = F(t);

        }

    }

    cout << M+R;

    return 0;

}


Аналоги к заданию № 18502: 18633 Все