Задать вопрос

Значение переменной C, вычисленное в программе, написанной на языке Pascal, var A, B, C : integer; beginA:=15; B:=5; C:=1; while A>B dobeginA:=A-B; if B>C then begin B:=B-C; C:=2*C endend; writeln (" C=‟, C) end. равно ___.

+1
Ответы (1)
  1. 4 мая, 21:54
    0
    Пройдемся по коду программы и найдем значение переменной c.

    Вводим значения переменных:

    A: = 15;

    B: = 5;

    C: = 1;

    Выполняем сравнение:

    15 > 5 (A > B), значит:

    A: = 15 - 5 = 10;

    5 > 1 (B > C), значит:

    B: = 5 - 1 = 4;

    C: = 2 * C = 2 * 1 = 2;

    Возвращаемся к первому сравнению while A > B:

    10 > 4 (A > B), значит:

    A: = 10 - 4 = 6;

    4 > 2 (B > C), значит:

    B: = 4 - 1 = 3;

    C: = 2 * C = 2 * 2 = 4;

    Возвращаемся к первому сравнению while A > B:

    6 > 3 (A > B), значит:

    A: = 6 - 3 = 3;

    3 > 4 (B > C) - неверно, значит:

    выходим из цикла и на экран выведется последнее значение переменной C.

    Таким образом: C = 4.

    Ответ: C = 4.
Знаешь ответ на этот вопрос?
Сомневаешься в правильности ответа?
Получи верный ответ на вопрос 🏆 «Значение переменной C, вычисленное в программе, написанной на языке Pascal, var A, B, C : integer; beginA:=15; B:=5; C:=1; while A>B ...» по предмету 📕 Информатика, используя встроенную систему поиска. Наша обширная база готовых ответов поможет тебе получить необходимые сведения!
Найти готовые ответы
Похожие вопросы информатике
Отметьте галочками характеристики предметов и явлений, которые человек воспринимает при помощи: а) органов зрения: ___ Громкий ___ Светлый ___ Сочный ___ Яркий ___ Огромный ___ Звонкий ___ Тусклый ___ Широкий ___ Близкий б) органов слуха: ___
Ответы (1)
Что напечатает следующая программа? program p3; var x, y:integer; procedure p1 (var a, b:integer); begin a:=sqr (a); b:=sqr (a) + a; end; procedure p2 (a, b:integer); begin a:=sqr (a); b:=sqr (b) + b; end; begin x:=2; y:=2; p1 (x, y);
Ответы (1)
Имеется условный оператор:if D10 then writeln ('ура!') else writeln ('плохо ...'); Какими операторами его можно заменить? Выберите несколько из 4 вариантов ответа: 1) if D=10 then writeln ('ура!') else writeln ('плохо ...
Ответы (1)
Запиши программу в Паскале для вычисления площади прямоугольника со сторонами c и m. 1) begin writeln ('Введи длину и ширину прямоугольника c и m'); readln (c, m); s:=c*m; writeln ('s=', s); readln; end.
Ответы (1)
В какой строчке допущена ошибка в программе, написанной на языке PascalABC? Программа должна высчитывать корни квадратного уравнения при заданных значениях коэффициентов a, b, c.
Ответы (1)