Запишите полный путь ( полное имя) к файлу работа.doc, который находится в папке практ, которая в свою очередь располагается в папке редактор на диске е.

e/редактор/практ/работа.doc

e: \редактор\практ\работа.doc

 

Решение с массивом var a: array[1..1000] of longint; i, n, k1, k2: longint; begin k1 : = 0; k2 : = 0; read(n); for i : = 1 to n do begin read(a[i]); if (a[i] mod 2 = 0) and (a[i] mod 5 = 0) then k1 : = k1 + 1; if (a[i] mod 3 = 0) and (a[i] mod 2 = 1) then k2 : = k2 + 1; end; writeln(k1, ' ', k2); end. решение без массива var x, i, n, k1, k2: longint; begin k1 : = 0; k2 : = 0; read(n); for i : = 1 to n do begin read(x); if (x mod 2 = 0) and (x mod 5 = 0) then k1 : = k1 + 1; if (x mod 3 = 0) and (x mod 2 = 1) then k2 : = k2 + 1; end; writeln(k1, ' ', k2); end.

1. не дано из какой системы счисления. если из 10 в 10, то будет 483 2.  не дано из какой системы счисления. если из 10 в 2, то будет 483 = 2^8 * 1 + 2^7 * 1 + 2^6 * 1 + 2^5 * 1 + 2^4 * 0 + 2^3 * 0 + 2^2 * 0 + 2^1 * 1 + 2^0 * 1 = 111 100 011 3. не дано из какой системы счисления. если из 10 в 8, то будет  483 = 8^2 * 7 + 8^1 * 4 + 8^0 * 3 = 743 4. как знаем, что 483 в двоичной будет 111 100 011, то в восьмеричную будет 743 (делишь число на три части. 7 это 111, 4 это 100, а 3 это 011) 5. знаем, что 483 в десятичной будет 483, то в шестнадцатеричной будет 1е3. (не знаю как сделать, но будет так) 6. ответ такой же как выше. число 111100011 делим на части по 4 символа. получаем 0001 1110 0011 (добавляем впереди нули), и по таблице будет 1е3 7. нельзя перевести, так как в восьмеричной системе счиления цифры только 0 1 2 3 4 5 6 7. а вот из шестнадцатеричной можно в восьмеричную число 483. будет 2203.  и сама таблица, если ее нет 0) 0000 1) 0001 2) 0010 3) 0011 4) 0100 5) 0101 6) 0110 7) 0111 8) 1000 9) 1001 а) 1010 b) 1011 c) 1100 d) 1101 e) 1110 f) 1111