1 дано число в 10-й системе счислени. вывести количество цифр в 10-й системе счисления.

2 дано число в 10-й системе счислени. вывести количество цифр в 2-й системе счисления.

3 дано число в 10-й системе счислени. вывести количество цифр в 8-й системе счисления.

4 дано число в 10-й системе счислени. вывести количество цифр в 16-й системе счисления.

5 дано число в 10-й системе счислени. вывести разность между самой большой и самой маленькой цифрой в 10-й системе счисления.

6 дано число в 10-й системе счислени. вывести разность между самой большой и самой маленькой цифрой в 8-й системе счисления.

7 дано число в 10-й системе счислени. вывести разность между самой большой и самой маленькой цифрой в 16-й системе счисления.

8 дано число в 10-й системе счислени. вывести количество четных цифр в 10-й системе счисления.

9 дано число в 10-й системе счислени. вывести количество четных цифр в 2-й системе счисления.

10 дано число в 10-й системе счислени. вывести количество четных цифр в 8-й системе счисления.

11 дано число в 10-й системе счислени. вывести количество четных цифр в 16-й системе счисления.

12 дано число в 10-й системе счислени. вывести количество букв в 16-й системе счисления.

13 дано число в 10-й системе счислени. вывести в строчку цифры в 10-й системе счисления, начиная с младшего разряда (123 => 3 2 1).

14 дано число в 10-й системе счислени. вывести в строчку цифры в 8-й системе счисления, начиная с младшего разряда (123 => 3 7 1).

15 дано число в 10-й системе счислени. вывести в строчку цифры в 16-й системе счисления, начиная с младшего разряда (123 => b 7).

16 дано число в 10-й системе счислени. вывести в строчку цифры в 10-й системе счисления, начиная со старшего разряда (123 => 1 2 3).

17 дано число в 10-й системе счислени. вывести в строчку цифры в 8-й системе счисления, начиная со старшего разряда (123 => 1 2 3).

18 дано число в 10-й системе счислени. вывести в строчку цифры в 16-й системе счисления, начиная со старшего разряда (123 => 1 2 3).

19 дано число 0 123).

20 дано число 0 321).

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

Ashmalikova

06.06.2021 14:05

Ккакой разновидности языков ( естественных или формальных ) может быть отнесена морская флажковая азбука?...

dimapavlov2007

06.06.2021 14:05

Решить пример. 189 надо разложить на двоичный код и ещё числа...

bon1101

06.06.2021 14:05

Что является образом мыши на экране...

Nikatysh

06.06.2021 14:05

От чего зависит форма указателя мыши...

Нетта771

19.06.2021 07:30

К панелям и компонентам внешнего оформления delphi отностятся...

cactuscus

21.05.2023 09:25

Бегущий огонек со шлейфом : по светодиодному кольцу последовательно перемещаются по кругу пять светодиодов с убыванием яркости (первый светится на 100% яркости, второй -70%,...

zverrodion199911

16.04.2023 08:26

Python Задача 3. Створити список з 10 випадкових елементів (від -10 до 10). Знайти суму цих елементів. Щоб знайти суму елементів списку, потрібно: 1) Створити змінну, яка буде...

Katyshkamya

21.04.2023 06:09

СИРИУС ПИТОН ОТ Не запуская код, ответьте на вопрос: что выведет на экран данная программа? (^ - я так обозначила отступы) def f(x): if x 0: g(x - 1) def g(x): print ( * , end...

katya99ov

14.04.2022 22:22

Здравствуйте. составить формулу в excel....

Krisitnka

09.05.2021 14:01

Написать программу нахождение максимального и минимального значения массива.программу нужно сделать в паскаль...

Ответ:

MrMixa008

20.02.2022 07:34

1
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 2 = 0
        then
            Writeln('Число чётное')
        else
            Writeln('Число не чётное');
    readln;
end.

2
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 3 = 0
        then
            Writeln('Число делится на 3')
        else
            Writeln('Число не делится на 3');
    readln;
end.

3
program z;
var
    i: array[1..6] of byte;
    x:byte;
begin
    for x:=1 to 6 do

        begin
            Writeln('Введите ', x,' цифру из 6 ');
            Read(i[x]);
        end;
    if (i[1]+i[2]) = (i[4]+i[5]+i[6])
        then
            Writeln('Билет счастливый')
        else
            Writeln('Билет не счастливый');
    Readln;
end.

5)))
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 6 = 0
        then
            Writeln('Число делится на 6')
        else
            Writeln('Число не делится на 6');
    readln;
end.
6
program z;
var
    a,b:integer;
begin
    Writeln('Введите число A'); Readln(a);
    Writeln('Введите число B'); Readln(b);
    if b mod a = 0
        then Writeln('Число А делится нацело на число В')
        else Writeln('Число А не делится нацело на число B');
    Readln;
end.

0,0(0 оценок)

Ответ:

лайко2

20.02.2022 07:34

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку