Поделитесь своими знаниями, ответьте на вопрос:
После прогулки человек смог перейти на новый уровень своих возможностей и стал более выносливым, но он хочет и дальше развиваться, поэтому перешел к следующей прогулке. Теперь перед ним встала задача пройти от первого до N-ого дерева в роще. Между каждым деревом человек проходил одинаковое количество шагов А. Создайте программу, просчитывающую за человека сколько шагов он за время прогулки и сколько шагов он проходил от первого дерева до каждого следующего дерева (от 1до 2 дерева, от 1 до 3, от 1 до 4)
Ввод x
readln(x);
Далее идет просто ифовое перечисление условий.
Промежутки:
(-oo;1]
[5;9)
Снизу левый не ясно откуда. Напишу что от 0. Вставишь своё число по заданию.
(0;3]
[7;+oo)
Всё, промежутки установили. Теперь вбиваем их в if
var
x:integer;
begin
readln(x);
if (x<=1) or ((x>=5) and(x<9)) or ((x>0) and (x<=3)) or (x>=7) then writeln('Принаждежит') else writeln('не принаждежит');
end.
Только я сделал 4 промежутка в одном задании)
Теперь ты разложи как нужно (либо на 2 задания, либо найди их общее решение.)