Извиняюсь, но первых скольки чисел произведение и каков предел n(если есть)?
1,5Кбайт =1536байтов=12288бит
Буквы латиницы в таблице ASCII кодируются очень просто:
A=41H=65, B=42H=66,..., Z=5AH=90, a=61H=97, b=62H=98,..., z=7AH=122.
Соответственно, Go = 01000111 01101111 = 47H 6FH.
Буквы Н означают 16-ную систему счисления.
uses
System.Collections.Generic;
var
a: List<<em>integer</em>> := new List<<em>integer</em>>(); <em>//Объявляем и создаём динамический массив</em>
i: integer;
begin
repeat
readln(i);
if (i = 0) then
break
else
a.Add(i);
until (False); <em>//Прекращаем цикл, когда рак (break) в цикле свиснет (False можно заменить на "2 + 2 = 5"</em>
writeln(#13); <em>//Вставляем 2 пустые строки</em>
foreach i in a do <em>//Выводим исходный массив</em>
write(i, ' '); <em />
writeln();
foreach i in a do <em>//Выводим конечные числа, нет задачи массив изменять</em>
write(abs(i), ' ');
end.