Тюльпан это такой провод, а точнее три в одном ну там красный,жёлтый и белый.
Можно обойтись без массива и этим сэкономить память компьютера.
Можно также вывести такую матрицу (в виде песочных часов) любого размера. Для этого нужно только изменить значение n в строке
const n=5
Program Pentelemon;
uses crt;
const n=5;
var
i,j:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
writeln();
for i:=1 to n do
begin
for j:=1 to n do
begin
if ((j>=i) and (i+j<=n+1)) or ((j<=i) and (i+j>=n+1)) then
write ('1 ')
else
write ('0 ');
end;
writeln();
end;
end.
Const
n = 8;
var
a: array[1..n] of integer;
i, t, im, max: integer;
begin
Writeln('Введите через пробел ', n, ' чисел');
max := -32768;
for i := 1 to n do
begin
Read(t);
a[i] := t; t := (i + 1) * t;
if max < t then begin max := t; im := i end;
end;
Writeln('Максимальное значение ', max, ' достигается как ', im + 1, '*a[', im, ']')
end.
<u>Тестовое решение:</u>
Введите через пробел 8 чисел
4 -3 5 4 3 2 1 0
Максимальное значение 20 достигается как 4*a[3]
"Hello, World!" - 13 символов
1 символ в ASCII - 7 бит
13 * 7 = 91 бит = 11 байт 3 бит