Есть ответ 👍

Заполнить двумерный массив по следующему принципу:
6 7 18 19 30 31
5 8 17 20 29 32
4 9 16 21 28 33
3 10 15 22 27 34
2 11 14 23 26 35
1 12 13 24 25 36

138
230
Посмотреть ответы 1

Ответы на вопрос:


Uses crt; const s='софокл'; var n,m,i,j,cf,ct: integer; begin randomize; n: =25; m: =(80)div n; for i: =1 to n do   begin   gotoxy(m*(i-1),i);   cf: =random(9)+8; //от голубого до желтого   ct: =random(9); //от синего до серого   textbackground(cf);   textcolor(ct);   write(s);   end; end.                           попробуй это 

Популярно: Информатика