Дана действительная матрица размера…

VAR: Array [1 … 3,1 … 4] целого; J, I, сумма: число; начинатьдля I: =1 до 3 сделать для J: =1 до 4 делают КеайЬп ([I, J]); для I: =1 до 3 делаем суммы: =SUM+[I, 4]; WriteLn (суммы); конца.