Регистрация
skshhd
27.04.2020 00:59
Информатика
Есть ответ 👍

Ввод числа алгоритма
Ниже записан алгоритм. Получив на вход число x, этот алгоритм печатает два числа a и b. Укажите наименьшее из таких чисел x, при вводе которого алгоритм печатает сначала 2, а потом 7.

var x, a, b: integer;

begin

readln(x);

a := 0; b := 1;

while x > 0 do

begin

a := a+1;

b := b*(x mod 100);

x := x div 100;

end;

writeln(a); write(b);

end.

226
469
Посмотреть ответы 1

Ответы на вопрос:

Гусяра228
Гусяра228
4,4(49 оценок)

var

  count, x : integer;

begin

  count : = 0;

  repeat

    read (x);

        if (x mod 4=0) and (x mod 10=4) then inc (count);

  until x   = 0;

  writeln (count);

end.

Популярно: Информатика