Регистрация
evaboyko
16.06.2020 10:15
Информатика
Есть ответ 👍

Необходимо обойти арифметическое дерево!
1) сверху-вниз
2) снизу-вверх
3) слева-напрпаво

106
455
Посмотреть ответы 1

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

altaeva81
altaeva81
4,6(8 оценок)

var

  i, j, k : integer;

begin

  i : = 1 + trunc (random (100));

  j : = 0;

  repeat

    writeln ('введите число');

    read (k);

    inc (j);

  until k = i;

  writeln ('верно. отгаданно с ', j, ' попытки. ');

end.

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