После прошлой прогулки человек смог перейти на новый уровень своих возможностей и стал более выносливым, но он хочет и дальше развиваться, поэтому перешел к следующей прогулке.
Теперь перед ним встала задача пройти от первого до N-ого дерева в роще. Между каждым деревом человек проходил одинаковое количество шагов А. Создайте программу, просчитывающую за человека сколько шагов он прошел за время прогулки и сколько шагов он проходил от первого дерева до каждого следующего дерева (от 1до 2 дерева, от 1 до 3, от 1 до 4)
ЗАДАЧА В ПАСКАЛЕ
Ответы
Ответ дал:
0
Вот код программы:
program steps;
var A: integer;
var B: integer;
var i: integer;
var all_: integer;
begin
writeln('сколько шагов между деревьями?:');
readln(A);
writeln('сколько деревьев?:');
readln(B);
for i:=1 to B-1 do begin
writeln('с ', 1, ' по ', i+1,' дерево ', i*A, ' M');
all_ += i*A;
end;
writeln('всго шагов: ', all_);
end.
P.S. проверить можно на сайте https://www.onlinegdb.com
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад