Задания
Версия для печати и копирования в MS Word
Тип Д22 № 6927
i

Ниже на пяти язы­ках за­пи­сан ал­го­ритм. По­лу­чив на вход число x, этот ал­го­ритм пе­ча­та­ет два числа: a и b. Ука­жи­те наи­мень­шее из таких чисел x, при вводе ко­то­ро­го ал­го­ритм пе­ча­та­ет сна­ча­ла 3, а потом 12.

 

Бей­сикПас­каль

DIM X, A, B AS INTEGER

INPUT X

A=0: B=0

WHILE X > 0

    A = A+1

    B = B +(X MOD 10)

    X = X \ 10

WEND

PRINT A

PRINT B

var x, a, b: integer;

begin

    readln(x);

    a:=0; b:=0;

    while x>0 do

        begin

            a:=a + 1;

            b:=b + (x mod 10);

            x:=x div 10;

        end;

    writeln(a); write(b);

end.

Си++Ал­го­рит­ми­че­ский

#include <iostream>

using namespace std;

int main()

{

    int x, a, b;

    cin >> x;

    a=0; b=0;

    while (x>0){

        a = a+1;

        b = b +(x%10);

        x = x/10;

    }

    cout << a << endl << b endl;

}

алг

нач

цел x, a, b

ввод x

a:=0; b:=0

нц пока x>0

    a:=a+1

    b:=b+mod(x,10)

    x:=div(x,10)

кц

вывод a, нс, b

кон

Python

x = int(input())

a = 0

b = 0

while x > 0:

    a += 1

    b +=x % 10

    x //= 10

print(a)

print(b)

Спрятать решение

Ре­ше­ние.

Зна­че­ние в пе­ре­мен­ной a после вы­пол­не­ния цикла равно ко­ли­че­ству вы­пол­нен­ных цик­лов. По­сколь­ку тре­бу­ет­ся, чтобы про­грам­ма на­пе­ча­та­ла сна­ча­ла число 3, цикл дол­жен вы­пол­нить­ся три раза. Опе­ра­тор div остав­ля­ет толь­ко целую часть от де­ле­ния, сле­до­ва­тель­но, ис­ко­мое число долж­но два раза де­лить­ся на 10 так, чтобы оста­ток был не мень­ше де­ся­ти, то есть быть трёхзнач­ным.

В пе­ре­мен­ной b на­кап­ли­ва­ет­ся сумма цифр ис­ко­мо­го трёхзнач­но­го числа. Таким об­ра­зом, не­об­хо­ди­мо найти наи­мень­шее трёхзнач­ное число, сумма цифр ко­то­ро­го равна 12. Это число 129.

 

Ответ: 129.

 

При­ведём дру­гое ре­ше­ние на языке Python.

for i in range(10000):

x = i

a = 0

b = 0

while x > 0:

a += 1

b += x % 10

x //= 10

if a == 3 and b == 12:

print(i)

break


Аналоги к заданию № 7677: 3544 4851 4939 ... Все

Раздел кодификатора ФИПИ: