ОТДЕЛ Задание+;
ПЕР
T: РЯД 3, 6 ИЗ ЦЕЛ;
сч1, сч2: ЦЕЛ;
УКАЗ
ОТ сч1 := 0 ДО 2 ВЫП
ОТ сч2 := 0 ДО 5 ВЫП
ЕСЛИ T[сч1, сч2] < 7 ТО
T[сч1, сч2] := T[сч1, сч2] * T[сч1, сч2]
ИНАЧЕ
УВЕЛИЧИТЬ(T[сч1, сч2], T[сч1, сч2])
КОН
КОН
КОН
КОН Задание.
Предварительного ввода или заполнения случайными числами тут нету, если нужно - добавь.