2. определить, делится ли введенное число "а" на 3. если делится то вывести на экран "число делится на 3".тип переменной определить самостоятельно. при составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0. 3. дана программа на языке паскаль. var a, n, s: integer; begin s: =0; n: =0; repeat; write('введите число '); readln(a); s: =s+a; n: =n+1; until s> 100; writeln('количество введенных чисел = ' , n); end. переписать программу используя цикл while. 4. вывести на экран массив целых чисел, состоящий из 15 элементов, значение которого из которых сгенерировано случайным образом из диапазона [20, 60].

Program qwe; uses crt; var a: real; begin clrscr; write('введите число: '); readln(a); if a mod 3=0 then writeln('da') else writeln('net'); readkey; end.

11001000

Объяснение:

1. Для получения прямого кода надо перевести число в двоичную систему счисления, дополнить слева незначащими нулями до необходимого разряда, первый (левый) разряд отводится под знак числа (если число положительное, то в левый разряд записывается 0, а если число отрицательное, то в левый разряд записывается 1)

56/2 = 28 и остаток 0

28/2 = 14 и остаток 0

14/2 = 7и остаток 0

7/2 = 3 и остаток 1

3/2 = 1 и остаток 1

1/2 = 0 и остаток 1

56₁₀ = 111000₂

Прямой код: 10111000

2. Обратный код для положительного числа совпадает с прямым кодом. Для отрицательного числа все цифры числа заменяются на противоположные (1 на 0, 0 на 1), а в знаковом разряде остаётся единица

Обратный код: 11000111

3. Дополнительный код положительного числа совпадает с прямым кодом. Для отрицательного числа дополнительный код образуется путем добавлением к младшему разряду обратного кода единицы (сложение в двоичной системе счисления)

1 + 1 = 10 (0 пишем, 1 в уме)

1 + 1 (из ума) = 10 (0 пишем, 1 в уме)

1 + 1 (из ума) = 10 (0 пишем, 1 в уме)

0+ 1 (из ума) = 1 (1 пишем)

сносим остальные цифры

Дополнительный код: 11001000

1) 100101₂

2) 45₁₀

3) 175₈

4) 335₁₀

Объяснение:

Для перевода числа из 10 системы счисления  в любую другую систему счисления надо нацело делить число на основание новой системы счисления (пока целая часть не станет равной 0) и записывать получившиеся остатки от деления. Число в новой системе счисления записывается в виде остатков деления, начиная с последнего

1) 37₁₀ → А₂

37/2 = 18 и остаток 1

18/2 = 9 и остаток 0

9/2 = 4 и остаток 1

4/2 = 2 и остаток 0

2/2 = 1 и остаток 0

1/2 = 0 и остаток 1

37₁₀ = 100101₂  

3) 125₁₀ → А₈

125/8 = 15 и остаток 5

15/8 = 1 и остаток 7

1/8 = 0 и остаток 1

125₁₀ = 175₈

Для перевода числа из любой системы счисления в 10 систему счисления используется развернутая запись числа - сумма произведений цифр числа на основание системы счисления числа в степени разряда цифры числа

2) 101101₂ → А₁₀

101101₂ = 1 * 2⁵ + 0 * 2⁴ + 1 * 2³ + 1 * 2² + 0 * 2¹ + 1 * 2⁰ = 32 + 0 + 8 + 4 + 0 + 1 = 45₁₀

4) 517₈ → А₁₀

517₈ =  = 5 * 8² + 1 * 8¹ + 7 * 8⁰ = 320 + 8 + 7 = 335₁₀