Question

Исполнитель Черепашка выполняет программу: для K от 1 до N выполнить вперёд K направо 90 кц Ввести N и определить расстояние между начальным и конечным положением исполнителя. Помогите решить на паскале

Answer 1

Это надо на алгоритмическом делать, а не на паскале

Answer 2

Конечно! Вот пример программы на языке Паскаль, которая решает данную задачу:

pascalCopy code
program TurtleDistance;

var
  N, K, Distance: integer;

begin
  write('Введите N: ');
  readln(N);
  
  Distance := 0; // Инициализируем переменную расстояния
  
  for K := 1 to N do
  begin
    writeln('Вперёд ', K, ' направо 90 кц');
    Distance := Distance + K; // Увеличиваем расстояние на текущее значение K
  end;
  
  writeln('Расстояние между начальным и конечным положением: ', Distance);
  
  readln;
end.

Программа запрашивает у пользователя значение N, затем выполняет цикл от 1 до N. В каждой итерации цикла она выводит текст "Вперёд K направо 90 кц" и увеличивает переменную расстояния на текущее значение K. По завершению цикла, программа выводит расстояние между начальным и конечным положением исполнителя.

Обратите внимание, что я использовал команду writeln для вывода текста на экран, и команду readln для чтения значения N с клавиатуры. Вы можете скопировать этот код и запустить его в своей среде разработки на Паскале для проверки.