В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
innamatvijchuk
innamatvijchuk
13.01.2020 02:58 •  Информатика

ЗА ТРИ ВО напишите на них решение через PYTHON^
№1. Ввести число от 1 до 20. Вывести на экран представление этого числа в троичной системе счисления.

№2. Получить случайное число от 3 до 20. Если оно чётное и двузначное, то вывести "да", иначе вывести "нет"

№3. Ввести число от 1 до 20. Вывести на экран, сколько цир оно содержит в двоичной системе счисления. (решить через цикл "while" и через "for")

Показать ответ
Ответ:
ladysweet1
ladysweet1
12.02.2023 02:10
Она наиболее простая. 
И двоичная система счисления имеет ряд преимуществ перед другими системами: для ее реализации нужны технические устройства с двумя устойчивыми состояниями (есть ток - нет тока, намагничен - не намагничен и т.п.), а не, например, с десятью, - как в десятичной;представление информации посредством только двух состояний надежно и помехоустойчиво;возможно применение аппарата булевой алгебры для выполнения логических преобразований информации;двоичная арифметика намного проще десятичной.
0,0(0 оценок)
Ответ:
olegykoleg
olegykoleg
28.12.2020 20:36
1)
program average;
var
    i: integer;
    answer, S, tmp: real;
begin
    for i := 1 to 5 do
    begin
        readln(tmp);
        S := S + tmp
    end;
    answer := S / 5;
    writeln(answer)
end.
2)
program equation;
var
    A, B, C, D, x1, x2: real;
begin
    writeln('ввеедите коэфициенты квадратного многочлена');
    readln(A);
    readln(B);
    readln(C);
    if A <> 0 then 
    begin 
    D := B*B - 4*A*C;
    if D < 0 then
        writeln('действительных корней нет')
    else if D = 0 then
    begin
        x1 := -B/(2*A);
        writeln('Единственный корень: ',x1)
    end else
    begin
        x1 := (-B + sqrt(D)) / (2*a);
        x2 := (-B - sqrt(D)) / (2*a);
        writeln('Два корня: ',x1,', ',x2)
    end;
    end
        else writeln('старший коэфициент не может равняться 0')
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота