Составьте программу, по которой на экран будет выведена вся таблица умножения

Var  b,a: integer;   begin   for b: =1 to 10 do begin   for a: =1 to 10 do begin     writeln(a,'*',b,'=',a*b);   end;   end; end.получается не в виде таблицы  а в столбик

// f# [< entrypoint> ] let main argv =     let generatetable n m =         array2d.init n m (fun i j -> (i+1) * (j+1))     let printmatrix (matrix: int[,]) =         printf "     "         for i = 0 to (array2d.length1 matrix) - 1 do             printf "%4d " (i+1)         printf "\n"         printf "     "         for i = 0 to (array2d.length1 matrix) - 1 do             printf ""         printf "\n"         for j = 0 to (array2d.length2 matrix) - 1 do             printf "%2d |" (j+1)             for i = 0 to (array2d.length1 matrix) - 1 do                 printf "%4d " matrix.[i, j]             printf "\n"         printf "\n"     let inputarray = generatetable 10 10     printmatrix inputarray     system.console.readkey true |> ignore     0

Влодку сначала садятся один купец и один разбоник перебираются на другой берег остается разбойник купец возвращаетя обратно забирает разбойника едут на другой берег там высажиается купец разбойник возвращается забирает купца едут на другой берег там высажиается купец разбойник возвращается забирает купца едут на другой берег там высажиается купец разбойник возвращается забирает разбойника едут на другой берег и высаживаются оба лодка совершила 9 рейсов

алфавит из 33 букв это:

аа, бб, вв, гг, дд, ее, ёё, жж, зз, ии, , кк, лл, мм, нн, оо, пп, рр, сс, тт, уу, фф, хх, цц, чч, шш, щщ, ъъ, , , ээ, юю, яя