Question

При каком наибольшем введенном числе d после выполнения программы будет напечатано 150? var n, s, d: integer; Begin readln(d); n := 3; s := 38; while s <= 1200 do begin s := s + d; n := n + 7 end; Write(n) End.

Answer 1

Ответ:

d=57

Объяснение:

немного изменим программу, пусть сама считает

var

n, s, d: integer;

k: integer;

Begin

 n:=0;

 d:=1;

 while n <> 150 do begin

   n := 3;

   s := 38;

   while s <= 1200 do begin

     s := s + d;

     n := n + 7

   end;

   inc(d);

 end;

 writeln('d=', d, ' n=', n);

End.

Answer 2

Для определения наибольшего введенного числа d, при котором программа выведет 150, мы можем проанализировать логику программы.

Программа выполняет следующие действия:

1. Сначала она считывает число d с клавиатуры.
2. Затем она инициализирует n и s и начинает цикл while.

Цикл while будет выполняться до тех пор, пока s меньше или равно 1200. В каждой итерации цикла значение s увеличивается на d, и значение n увеличивается на 7.

Теперь мы хотим найти такое значение d, которое приведет к тому, что значение n станет равным 150, а s не превысит 1200. Мы можем использовать следующие уравнения:

1. Условие n = 150.
2. Условие s <= 1200.

Мы знаем, что s увеличивается на d в каждой итерации, а n увеличивается на 7 в каждой итерации. Мы хотим найти такое d, при котором n будет равно 150, и s не превысит 1200.

Начнем с начальных значений n и s:

• Начальное значение n = 3
• Начальное значение s = 38

Теперь мы можем создать уравнения на основе описанных операций:

1. n + 7x = 150, где x - количество итераций цикла.
2. s + dx <= 1200, где x - количество итераций цикла.

Мы хотим найти такое значение d, при котором выполняются оба условия. Давайте решим это уравнение:

1. n + 7x = 150
2. 3 + 7x = 150
3. 7x = 150 - 3
4. 7x = 147
5. x = 147 / 7
6. x = 21

Теперь мы знаем, что x = 21, что означает, что цикл выполнился 21 раз. Теперь мы можем использовать это значение x для второго уравнения:

1. s + dx <= 1200
2. 38 + d * 21 <= 1200

Решим это уравнение:

1. 38 + 21d <= 1200
2. 21d <= 1200 - 38
3. 21d <= 1162
4. d <= 1162 / 21
5. d <= 55.33...

Так как d должно быть целым числом, наибольшее значение d, которое не превысит 55, будет 55.

Таким образом, наибольшее введенное значение d, при котором программа выведет 150, равно 55.