Разделения на колонки не видны. понять можно только проверит зайдя на "разметка страницы-колонки" или во время написания самого текста
Program MinDist;
{$APPTYPE CONSOLE}
uses sysutils;
const
k = 100;
ax = 10;
ay = -2;
var
T: array[1..k, 1..2] of integer;
r, rmin, i, n: integer;
begin
write('Введите число точек на плоскости: ');
readln(n);
rmin := 32767;
Randomize;
writeln('Исходные данные:');
for i := 1 to n do
begin
T[i, 1] := Random(51) - 25;
T[i, 2] := Random(51) - 25;
r := sqr(T[i, 1] - ax) + sqr(T[i, 2] - ay);
if rmin > r then rmin := r;
writeln('(', T[i, 1], ',', T[i, 2], ')')
end;
writeln(#13#10, 'Минимальное расстояние от А(', ax, ',', ay, ') равно: ', sqrt(rmin))
end.
Объем памяти = 1280*1024*8 бит = 1280*1024*8/8 байт = 1280*1024 байт =
1280*1024/1024 Кбайт = 1280 Кбайт
Нет, тк 1 символ=8 бит, то 8 символов=8*8=64 бит