Question

Как посчитать количество шагов на отрезке [-pi;pi] с шагом pi\8. Помогите пожалуйста составить программу на языке паскаль

Answer 1

Для подсчета количества шагов на отрезке [-pi; pi] с шагом pi/8 в языке Паскаль можно использовать следующую программу:

program CountSteps;

var
  start, finish, step, current: real;
  count: integer;
  
begin
  // инициализация начальных значений
  start := -pi;
  finish := pi;
  step := pi / 8;
  
  // счетчик шагов
  count := 0;
  
  // текущая позиция
  current := start;
  
  // цикл подсчета шагов
  while current <= finish do
  begin
    count := count + 1;
    current := current + step;
  end;
  
  // вывод результата
  writeln('Количество шагов на отрезке [-pi; pi] с шагом pi/8: ', count);
  
end.

Программа инициализирует начальные значения: `start` и `finish` - начало и конец отрезка `[-pi; pi]`, `step` - шаг `(pi / 8)`. Затем задается счетчик `count` и текущая позиция `current`, которая устанавливается в значение `start`.

Далее следует цикл `while`, который выполняется до тех пор, пока текущая позиция `current` не превысит значение `finish`. Внутри цикла выполняются две операции: увеличение счетчика `count` и увеличение текущей позиции `current` на величину шага `step`.

По окончании цикла программа выводит результат - количество шагов на отрезке.