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

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

михаил - футбол,велоспорт.

николай - теннис, волейбол.

михаил - баскетбол, плавание.

решение: так как михаил не увликаеться  велоспортом, волейболом  и тенисом значет он занимаеться плаванием. тогда получаеться что тенисист - николай и потому как он самый старший то павел будет велосипедистом из этого выходит что волейболистом будет николай.

нет,так как это не текствовый документ ,а картинка,и компьютер читает отсканированный файл картинкой а не текстом!