1program synerr2(input,outpu); 2integer a(10) 3begin 4 read(b); 5 for c := 1 to 10 do 6 a(c) := b * c; 7end. 8