//Блок-схема во вложении
//Pascal ABC.NET v3.0 сборка 1111
Var
a,i,n,max,maxi:integer;
begin
readln(n);
for i:=1 to n do
begin;
readln(a);
if abs(a)>max then
begin;
max:=abs(a);
maxi:=i;
end;
end;
write('Максимальный по модулю элемент был введен ',maxi,'-м');
<span>end.
</span>
Компас''ьютер прости знаю только одно слово
Var
A:integer;
Begin
Write(A);Read(A);
if (A>9)and(A<100) then Write('А - двузначное')
else Write('А - не двузначное')
End.
Во вкладке «Главная» меню Word есть раздел «Абзац», войдя в который, настраивают все абзацные параметры. В этом окне настраиваются отступы первой строки или всего текста, междустрочные интервалы.