1) Цикл от 2 включительно, до 20 включительно. 2) Видим первое условие: i>=3 и i<=8 соответственно, когда циклическая переменная будет равна 3 (i=3) будет выполнено условие. А также при i=9 условие не будет выполняться. 3) Видим второй блок условий. Они подразумевают, что квадрат переменной не должен быть выше границы в 20 единиц. Берем на заметку, что квадрат 5 равен 25, что является подходящим под условие и принудительно завершит цикл. 4) Итак, при первом цикле переменная равна 2. Ни одно из условий не выполниться. При i=3 выполниться первое условие и сумма увеличиться на остаток от деления i на 2, т.е. на 1. Это условие будет выполняться до 5, позже цикл прервёт второе условие. Значит необходимо посчитать остатки от деления i (3..5) на 2. ответ: 2
// PascalABC.NET 3.2, сборка 1514 от 11.08.2017 // Внимание! Если программа не работает, обновите версию!
begin var (x,y):=ReadReal2('Введитие координаты точки'); if (x<0) and (y>0) then Writeln('Точка лежит во II четверти') else Writeln('Точка не лежит во II четверти') end.
Пример Введитие координаты точки -4.6 7 Точка лежит во II четверти
begin var n:=ReadInteger('Введите двухзначное число'); if n div 10+n mod 10>9 then Writeln('Сумма цифр больше девяти') else Writeln('Сумма цифр не больше девяти') end.
Примеры Введите двухзначное число 47 Сумма цифр больше девяти
Введите двухзначное число 81 Сумма цифр не больше девяти
