1. Информатика
  2. ЗАДАНИЕ В ПАСКАЛЕ После

ЗАДАНИЕ В ПАСКАЛЕ После прогулки человек смог перейти на новый уровень своих возможностей и стал более выносливым, но он хочет и дальше развиваться, поэтому перешел к следующей прогулке.
Теперь перед ним встала задача пройти от первого до N-ого дерева в роще. Между каждым деревом человек проходил одинаковое количество шагов А. Создайте программу, просчитывающую за человека сколько шагов он за время прогулки и сколько шагов он проходил от первого дерева до каждого следующего дерева (от 1до 2 дерева, от 1 до 3, от 1 до 4)

orhideya68 orhideya68    2   05.11.2020 02:17    0

Ответы
baten baten  12.02.2021 16:38

program walk;

var ST: integer;

var T: integer;

var i: integer;

var all_: integer;

begin

  writeln('сколько шагов между деревьями?: ');

  readln(ST);

  writeln('количество деревьев: ');

  readln(T);

  for i:=1 to T-1 do begin

      writeln('с ', 1, ' по ', i+1,' дерево ', i*ST, ' M');

      all_ += i*ST;

  end;

  writeln('всго шагов: ', all_);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
НастяО11 НастяО11  13.05.2020 05:40
Напишите код программы которая после ввода вашего имени с клавиатуры, имя печатается 10 раз и печатает слово готово...
дашадашадашадаша1 дашадашадашадаша1  13.05.2020 05:36
У исполнителя калькулятор две команды 1. вычти 4 2. умножь на 3Какое число получит этот исполнитель если выполнит программу 211221 для начального числа 8?​...
7Karim777 7Karim777  27.08.2019 17:30
Сортировка. метод выбора. уровень a. массив содержит четное количество элементов. напишите программу, которая сортирует первую половину массива по возрастанию, а вторую...
anastasiya5budkevich anastasiya5budkevich  27.08.2019 17:30
Осталось мало ! 15 ! нужно ускорить работу программы по нахождению количества различных элементов в массиве. массив достигает до 100 000 элементов, а сами элементы...
saya8282 saya8282  27.08.2019 17:30
Сортировка. метод выбора. напишите программу, которая сортирует массив и находит количество различных чисел в нем. пример: массив: 5 3 4 2 1 6 3 2 4 после сортировки:...
frolikoffgrigory frolikoffgrigory  27.08.2019 17:30
Найти все натуральные числа, не превосходящие заданного n и равные сумме кубов его цифр. var i,j,k : byte; begin for i: =1 to 9 do for j: =0 to 9 do for k: =0 to 9...
murka0210 murka0210  27.08.2019 17:40
Алгоритм вычисления значения функции f(n), где n – натуральное число, задан следующими соотношениями: f(1) = 4 f(n) = f(n–1) · f(n–1)+ f(n–1) · n + 5· n, при n 1 чему...
valeriuadobro20 valeriuadobro20  27.08.2019 17:40
Алгоритм вычисления значения функций f(n) и g(n), где n – натуральное число, задан следующими соотношениями: f(1) =3; f(n) =3⋅f(n–1) +3 ⋅ n, при n 1; g(1) =2; g(n)...
луя3 луя3  27.08.2019 17:40
Алгоритм вычисления значения функций f(n) и g(n), где n – натуральное число, задан следующими соотношениями: f(1) = 3 f(n) = 5 · f(n–1) - f(n–1) · n + 5· n, при n...
111122223 111122223  27.08.2019 17:40
Алгоритм вычисления значения функции f(n), где n – натуральное число, задан следующими соотношениями: f(1) = 3; f(2) = 3; f(n) = 2·f(n - 2) -2·(n - 1), при n 2. чему...

Популярные вопросы