Вывести на экран число от 1 до 5в. а) прямом порядке b) обратном порядке

1) var a: integer; begin for a: =1 to 5 do write(a,' '); end.2)var a: integer; beginfor a: =5 downto 1 dowrite(a,' '); end.

12 3 4 5 5 4 3 2 1 все!

Var     i,n,max: integer;     a: array[1..30]of integer; begin writeln('исходный массив: '); for i: =1 to 30 do   begin   a[i]: =random(0,1000);   writeln(a[i]);   if (a[i]> 9) and (a[i]< 100) then       begin       if max=0 then max: =a[i];       if a[i]> max then max: =a[i];       end;   end; for i: =1 to 30 do   if a[i]=max then n: =n+1; if max> 0 then writeln('n=',n)     else writeln('таких нет'); end.

До второй половины xix  в.  – «ручная» информационная технология, инструментами при котором были перо, чернильница, бумага; с конца xix  в.  – «механическая» технология, инструментарий которой составляли пишущая машинка, телефон, диктофон, почта; 1940—1960-е гг. xx  в.  – «электрическая» технология, инструментарий которой составляли большие электронно-вычислительные машины (эвм) и соответствующее программное обеспечение, электрические пишущие машинки, ксероксы, портативные диктофоны; с начала 1970-х гг.  – «электронная» технология, основным инструментарием являются большие эвм и создаваемые на их базе автоматизированные системы (асу) и информационно-поисковые системы (ипс), которые оснащены широким спектром программных комплексов; с   середины 1980-х гг.  – «компьютерная» технология, основной инструментарий – пк с широким спектром стандартных программных продуктов разного назначения.