1)напишите процедуру в программе pascal abc(паскаль), которая выводит на экран в столбик все цифры переданного ей числа, начиная с первой. пример: 1234 1 2 3 4 2)напишите процедуру, которая выводит на экран запись переданного ей числа в римской системе счисления. пример: 2013 mmxiii

Procedure proc1(n: int64); var       s: string;       i: integer; begin       str(n, s);         for i : = 1 to length(s) do writeln(s[i]); end; вторая  в  файле:

Const nx=20; mx=20;   var n,m,i,j,min,max,s: integer;   a: array[1..nx,1..mx] of integer; b: array[1..nx] of integer;   begin  write('введите n и m'); read(n,m); max: =-100; min: =100;   for i: =1 to n do begin  for j: =1 to n do begin  a[i,j]: = random(50)-25;   if max < a[i,j] then max : = a[i,j];   if min > a[i,j] then min : = a[i,j];   write(a[i,j]: 4);   end; writeln;   s: = max + min;   b[i]: = s; max: =-100; min: =100;   end; writeln;   for i: =1 to n do begin write(b[i]: 4);   end;   end.

1624 год-считающие часы в.шиккарда( первый механический калькулятор, умевший выполнять четыре арифметические действия) 1642 год-паскалина б.паскаля 1820 год-калькулятор ч.томаса(арифмометр томаса, который мог складывать, вычитать, умножать и делить. в основном, он был основан на работе лейбница 1939 год-z1 к.цузе( так и не заработала достаточно надёжно, из-за недостаточной точности выполнения составных частей.) 1940 год-z2 к.цузе(её планы и фотографии были уничтожены) 1943 год-z3 к.цузе(она была построена на телефонных реле и работала вполне удовлетворительно. тем самым, z3 стала первым работающим компьютером, программой) 1945 год-эниак 1963 год-colossus(«колосс» стал первым полностью электронным вычислительным устройством, хотя на нём и нельзя было реализовать любую вычислимую функцию) 1965 год-apple 2 2008 год-скиф мгу (суперкомпьютер собранный на базе решений и оборудования американской фирмы intel, проект был разработан в государственном университете (26-е место в рейтинге топ-500 2012).