Очень сильно нужно очень нужно
​

Объяснение:

1)['a', 45, 89, 'who', 67]

2)3

3)1

2

3

4

5

4)['H', 'e', 'l', 'l', 'o', '!']

5)[100, 2, 10, 'Hello']

program mdd; uses crt; var i: longint; beginclrscr; for i: = 10 to 99 dobeginif i mod 13 = 0 then writeln(i); end; readkey; end.

var i: integer;

s: string;

begin

  s: ="abcdefghijklmnopqrstuvwxyz";

  for i: = 1 to length(s) do

      writeln(s[i],' = ', ord(s[i]));

end.