Var i: integer;
begin
for i:=1 to 9 do
writeln('7 * ', i, ' = ', 7 * i)
<span>end.</span>
На горбушку) там много мастеров)
Допустим, мы выбрали число 26
1. 26*26=676
2. 676+26+26=728
3. 728/26=28
4. 28-26=2
В ответе всегда будет получаться число 2 из-за того, что во втором пункте мы дважды прибавляем задуманное число
Основа метода (самое важное) - использование концепции трех базовых элементов - линейной, ветвления, и цикла.
На втором месте по значимости - использование большого количества подпрограмм