Прежде чем уменьшить пробелы между словами в тексте, необходимо выяснить причину, по которой они возникли. Их может быть несколько: выравнивание текста по ширине; лишние пробелы; знак табуляции между словами или использование длинных пробелов. Все эти проблемы могут возникнуть, например, вследствие копирования текста из Интернета. Чтобы привести текст в должный вид, необходимо по порядку избавиться от всех вышеназванных причин. Выравнивание текста . Частая причина появления большого интервала между словами – выравнивание текста по ширине. При таком выравнивании слова равномерно распределяются по всей длине строки за счет увеличения расстояния между ними.
Объяснение: более подробно можете поискать в интернете. Удачи)
const N=20;
var
a: array [1..100] of integer;
sum,i,k: integer;
begin
write('Введите элементы массива: ');
for i:=1 to N do
read(a[i]);
writeln('Элементы массива a: ');
for i:=1 to N do
write(a[i],' ');
writeln;
write('Введите число K: ');
readln(k);
for i:=1 to N do
if (a[i] mod K = 0) then
sum:=sum+a[i];
writeln('Сумма элементов равна: ', sum);
end.