Вывести на экран латинский алфавит в прямом порядке от a до z(красным цветом) и обратном порядке от z до a (желтым цветом используйте цикл for

uses crt; type tm=array [1..26] of char; var a: tm; i,n: integer; begin  n: =65;   for i: =1 to 26 do  begin    textcolor(red);     a[i]: =(chr(n));     write(a[i],' ');     n: =n+1;   end;   writeln;   for i: =1 to 26 do  begin    textcolor(yellow);     a[i]: =(chr(123-i));     write(a[i],' ');     n: =n+1;   end; end.

использовать Чертежник

алг Слон

  нач

  опустить перо

  сместиться на вектор(2, 0)

  сместиться на вектор(0, 2)

  сместиться на вектор(1, 0)

  сместиться на вектор(0, -2)  

  сместиться на вектор(2, 0)

  сместиться на вектор(0, 2)

  сместиться на вектор(1, 1)

  сместиться на вектор(0, 2)

  сместиться на вектор(1, -2)

  сместиться на вектор(-1, 2)

  сместиться на вектор(-1, 1)

  сместиться на вектор(-3, 0)

  сместиться на вектор(-1, 1)

  сместиться на вектор(-1, 0)

  сместиться на вектор(-1, -2)

  сместиться на вектор(-1, 0)

  сместиться на вектор(0, 3)

  сместиться на вектор(-1, 0)

  сместиться на вектор(0, -3)

  сместиться на вектор(1, -1)

  сместиться на вектор(2, -1)

  сместиться на вектор(0,-3)

  поднять перо

  сместиться на вектор(1, 3)

  опустить перо

  сместиться на вектор(1, 1)

  сместиться на вектор(0, 2)

  поднять перо

  сместиться на вектор(-2, -1)

  опустить перо

  сместиться на вектор(-0.1, 0.1)

  сместиться на вектор(-0.1, -0.1)

  сместиться на вектор(0.1, -0.1)

  сместиться на вектор(0.1, 0.1)

  поднять перо

  сместиться на вектор(0, -5)

кон

Объяснение:

Если считать что у племени мульти в алфавите не 17, а 16 символов, то решается так: на 1 символ у племени мульти требуется log₂16 = 4 бита на сообщение из 100 символов - 100*4 = 400 бит для племени пульти получится соответственно log₂32=5 бит, на все сообщение 50*5=250 бит сравниваем: 400 бит > 250 бит если в 17, а не 16, то значение логарифма получится не целым ( 4.08746284125), можно это значение дальше и подставлять. если считать, что каждый символ кодируется целым числом бит, то на 1 символ у племени мульти потребуется также 5 бит (округление выполняют всегда в большую сторону). остальные расчеты делаются аналогично