Разобраться в решении задачи. Записать условие задачи. Заполнить раздел описания переменных с указанием типа и назначения каждой переменной. Var Begin Sum:=0; For x:=1 to 10 do Sum:=Sum+1; Writeln(‘Sum=’,Sum); End.
Примечание: я могла не совсем правильно понять смысл фразы «записать условие задачи». Написала, как смогла (см. последний абзац).
Решение.
Программа (то есть, собственно, решение задачи) начинается после слова begin.
Сначала переменной Sum присваивается значение 0 (о чём нам говорит знак :=, что значит «присвоить»; теперь Sum=0).
Затем активируется цикл «for..do». Этот цикл сначала присваивает переменной х (которая записана между for и do) значение 1 (цифра после х и знака :=). После этого цикл увеличивает значение х на единицу, пока она не станет равной 10 (цифра после to). Каждый раз, как х увеличивается на единицу, совершается действие, указанное после «do», а именно «Sum:=Sum + 1» — переменной Sum присваивается значение на единицу большее, чем предыдущее. Другими словами, х, которая сначала равна 1, увеличивается на единицу столько раз, пока не станет равной 10, и каждый раз, как это происходит, Sum тоже увеличивается на 1. Так как изначально Sum=0 (из-за строчки «Sum:=0»), и мы увеличиваем её значение на единицу 10 раз (при х = 1; 2; 3; 4; 5; 6; 7; 8; 9 и 10), то в результате Sum=10.
Строчка «writeln (‘Sum=‘, Sum)» выводит на экран сначала сочетание символов «Sum=», а затем значение переменной Sum (10).
На этом программа заканчивается, о чём свидетельствует строчка End.
Итак, в задаче используются две переменные: Sum — основная переменная, над которой совершаются действия и конечное значение которой в результате выводится на экран; относится к целочисленному типу данных (integer), т. к. в программе принимает только значения нуля и первых десяти натуральных чисел.
х — вс переменная, необходимая для запуска цикла «for... do». Напрямую над ней действия не совершаются. Также имеет целочисленный тип данных, так как принимает только целые значения от 1 до 10.
На основе этого можно записать строчку
var Sum, x: integer;
Условие задачи можно примерно описать так:
Есть некая переменная Sum, равная нулю. Напишите программу, которая 10 раз увеличит её значение на 1, используя только оператор присваивания и цикл «for», а также выведет конечное значение Sum на экран.
1 задание) ответ: 1323141; Двигаемся в обратном порядке 2324142 (идём с конца) ей противоположные 1323141 2 задание) ответ: 2949; мы должны получить 11 и 13 причем минимально . можем только так 9+2 и 9+4 . значит 2949 3 задание) ответ: 3; чтобы добраться до 21 нам нужно выполнить 1 команду 6 раз и 3 раза вторую , нас спрашивают про вторую пишем ответ 3 4 задание) ответ: 1; нам нужно число которое делится на 5 то есть 4 отпадает , и также нам нужно чтобы модуль разности был не более 2 и во втором и в третьем модуль разности больше 2 , остается 1. 5 задание) ответ: 1112221; Я всегда начинаю с обратного 57-56-28-14-7-6-5-4 собираем с конца 1112221
Таких систем исчисления всего две. Основание а = 9 и основание а =367, но в системе с основанием 367 проблематично записывать числа (символов не хватит). Если число 3306(10) в системе исчисления с основанием а заканчивается цифрой 3, то тогда число 3303 делится на основание системы а. Отсюда алгоритм поиска. Находим все делители числа 3303. 3303 = 3*1101 = 3*3*367. Число 367 - простое. Поэтому основаниями системы исчисления могут быть только 3, 9, 367. Основание =3 не подходит, так как по условию число должно заканчиваться на 3 -> основание больше 3. Остаются 9, 367.
Примечание: я могла не совсем правильно понять смысл фразы «записать условие задачи». Написала, как смогла (см. последний абзац).
Решение.
Программа (то есть, собственно, решение задачи) начинается после слова begin.
Сначала переменной Sum присваивается значение 0 (о чём нам говорит знак :=, что значит «присвоить»; теперь Sum=0).
Затем активируется цикл «for..do». Этот цикл сначала присваивает переменной х (которая записана между for и do) значение 1 (цифра после х и знака :=). После этого цикл увеличивает значение х на единицу, пока она не станет равной 10 (цифра после to). Каждый раз, как х увеличивается на единицу, совершается действие, указанное после «do», а именно «Sum:=Sum + 1» — переменной Sum присваивается значение на единицу большее, чем предыдущее. Другими словами, х, которая сначала равна 1, увеличивается на единицу столько раз, пока не станет равной 10, и каждый раз, как это происходит, Sum тоже увеличивается на 1. Так как изначально Sum=0 (из-за строчки «Sum:=0»), и мы увеличиваем её значение на единицу 10 раз (при х = 1; 2; 3; 4; 5; 6; 7; 8; 9 и 10), то в результате Sum=10.
Строчка «writeln (‘Sum=‘, Sum)» выводит на экран сначала сочетание символов «Sum=», а затем значение переменной Sum (10).
На этом программа заканчивается, о чём свидетельствует строчка End.
Итак, в задаче используются две переменные: Sum — основная переменная, над которой совершаются действия и конечное значение которой в результате выводится на экран; относится к целочисленному типу данных (integer), т. к. в программе принимает только значения нуля и первых десяти натуральных чисел.
х — вс переменная, необходимая для запуска цикла «for... do». Напрямую над ней действия не совершаются. Также имеет целочисленный тип данных, так как принимает только целые значения от 1 до 10.
На основе этого можно записать строчку
var Sum, x: integer;
Условие задачи можно примерно описать так:
Есть некая переменная Sum, равная нулю. Напишите программу, которая 10 раз увеличит её значение на 1, используя только оператор присваивания и цикл «for», а также выведет конечное значение Sum на экран.