2. Определить, что является результатом работы программки при =100, =3Program Z2;Function

2. Определить, что является результатом работы программки при =100, =3

Program Z2;

Function largest_power (x, y: longint):word;

Var n: word;

p: longint;

Begin

p:=y; n:=0;

While xlt;=x do

Begin

p:=y*p;

inc(n);

End;

largest_power:=n;

End;

Begin

Writeln('Введите значения a и b'); Readln (a,b);

Writeln('n=', largest_power (a, b));

End.

Задать свой вопрос
1 ответ
Эта программка не делает ничего. Безусловно. Зависает навечно. В функции есть строчка whle xlt;=x, что дозволяет ей вертеться постоянно. Я думаю, что то вульгарно не так, и раз уж так и произошло, то по сущности, largest power - это степень не превосходящего меньшего числа, то есть, величайшая ступень, в которую можно возвести число, что бы результат был меньше, чем другое число. И здесь необходимо лишь поменять while xlt;=x на while plt;=x и вот, она на тесте 100 3 даст ответ 4, так как 3*3*3*3=27*3lt;100, а вот 3*3*3*3*3gt;100. Но это только предположения. А так ваша программка выводит просьбу о введении числа, считывает их, ставит на вывод "n=" и уходит вдаль, ожидая, пока число будет больше самого себя
Камилла Земнина
Вы не поверите эту задачку дали на таблицу трассировки в институте на алгоримизации. шок но я насребла какую то и прокатило
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт