Задать вопрос
16 марта, 01:15

cделать с помощью цикла repeat until

Логической переменной t присвоить значение true

или false в зависимости от того, является натуральное число k степенью 3 или

нет.

+3
Ответы (1)
  1. 16 марта, 03:17
    0
    Var chislo:integer;

    proverka:boolean;

    begin

    proverka:=true;

    read (chislo) ;

    repeat

    if chislo=0 then / / так как 0 не натуральное число

    begin

    proverka:=false;

    break;

    end;

    if (chislo mod 3) >0 then

    begin

    proverka:=false;

    break;

    end

    else chislo:=chislo div 3;

    until (chislo=0) ;

    if proverka then WriteLn ('Да')

    else WriteLn ('Нет') ;

    readln;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «cделать с помощью цикла repeat until Логической переменной t присвоить значение true или false в зависимости от того, является натуральное ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Выберите логическое выражение, принимающее значение True a) (True and True) and (False or False) b) Not (True and Not False) or False c) (True or False) or Not (True and True) d) Not (True or False) and True
Ответы (1)
Дан алгоритм: Начало Присвоить a значение 1 Присвоить b значение 1 Присвоить c значение 0 Пока a меньше чем 1001 Начало цикла Присвоить b значение b * a Присвоить a значение a + 1 Конец цикла Пока b делится на 6 Начало цикла Присвоить c значение c +
Ответы (1)
1. Вычислите логические выражения: not true and not false not true or not false not (true or false) not (true and false) 2. Напишите условие нахождения точки a в первом квадранте системы координат, считая ее координаты заданными X переменными x, y.
Ответы (1)
1) Какие операторы используются для организации циклов? a) while условие until; b) repeat until условие; c) while условие do; d) repeat do условие.
Ответы (1)
Даны две числовые переменные a и b. Необходимо присвоить переменной a значение переменной b, переменной b необходимо присвоить значение переменной a, без использования дополнительных переменных.
Ответы (1)