«А»: Напишите программу, которая находит количество
четырёхзначных чисел, которые делятся на 7.
«В»: Ипполит задумал трёхзначное число, которое при
делении на 15 даёт в остатке 11, а при делении на
11 даёт в остатке 9. Напишите программу, которая
находит все такие числа.
«С»: С клавиатуры вводится натуральное число N.
Программа должна найти факториал этого числа
(обозначается как N!) — произведение всех
натуральных чисел от 1 до N. Например,
5! = 1 • 2 • 3 • 4 • 5 = 120.

ОбъяснениеВ языке Паскаль описатель типа integer требует выделить под каждую переменную или элемент массива количество памяти, необходимое для размещения чисел из диапазона , т.е. отвести не менее двух байт, что и выполнялось в ранних системах, таких как Turbo Pascal, созданных во времена дорогой оперативной памяти. В современных разработках может выделяться и большее количество байт, например, в PascalABC.Net под переменную типа integer отводится 4 байта.

Описатель array [1..20] of integer требует отвести память под 20 элементов типа integer, следовательно, если говорить о минимально необходимом количестве байт, то ответом будет в) 20, 40.

А для PascalABC.Net ответ должен быть 20, 80

Подробнее - на -

использовать Чертежник

алг

нач

поднять перо

сместиться на вектор (-9,0) |начальная позиция

опустить перо |0

сместиться на вектор (1,0)

сместиться на вектор (0,2)

сместиться на вектор (-1,0)

сместиться на вектор (0,-2)

поднять перо

сместиться на вектор (2,0)

сместиться на вектор (0,1) |1

опустить перо

сместиться на вектор (1,1)

сместиться на вектор (0,-2)

поднять перо

сместиться на вектор (1,0)

сместиться на вектор (0,2) |2

опустить перо

сместиться на вектор (1,0)

сместиться на вектор (0,-1)

сместиться на вектор (-1,0)

сместиться на вектор (0,-1)

сместиться на вектор (1,0)

поднять перо

сместиться на вектор (1,0)

опустить перо |3

сместиться на вектор (1,0)

сместиться на вектор (0,1)

сместиться на вектор (-1,0)

сместиться на вектор (1,0)

сместиться на вектор (0,1)

сместиться на вектор (-1,0)

поднять перо

сместиться на вектор (2,-2)

сместиться на вектор (0,2) |4

опустить перо

сместиться на вектор (0,-1)

сместиться на вектор (1,0)

сместиться на вектор (0,1)

сместиться на вектор (0,-2)

поднять перо

сместиться на вектор (1,0)

опустить перо |5

сместиться на вектор (1,0)

сместиться на вектор (0,1)

сместиться на вектор (-1,0)

сместиться на вектор (0,1)

сместиться на вектор (1,0)

поднять перо

сместиться на вектор (1,-2)

опустить перо |6

сместиться на вектор (1,0)

сместиться на вектор (0,1)

сместиться на вектор (-1,0)

сместиться на вектор (0,-1)

сместиться на вектор (0,2)

сместиться на вектор (1,0)

поднять перо

сместиться на вектор (1,-2)

сместиться на вектор (0,2) |7

опустить перо

сместиться на вектор (1,0)

сместиться на вектор (0,-2)

поднять перо

сместиться на вектор (1,0)

опустить перо |8

сместиться на вектор (0,2)

сместиться на вектор (1,0)

сместиться на вектор (0,-1)

сместиться на вектор (-1,0)

сместиться на вектор (1,0)

сместиться на вектор (0,-1)

сместиться на вектор (-1,0)

поднять перо

сместиться на вектор (2,0)

опустить перо |9

сместиться на вектор (1,0)

сместиться на вектор (0,2)

сместиться на вектор (-1,0)

сместиться на вектор (0,-1)

сместиться на вектор (1,0)

поднять перо

сместиться на вектор (1,-1)

кон