Задать вопрос
4 августа, 13:53

Объясните, как будут выполняться фрагменты программ:

1) if ab then a:=a else a:=b;

7) if a mod 23 then a:=a+1;

8) if (a mod 2=1) or (a mod 2 = 0) then if a<0 then a:=-a;

9) if a<0 then b:=a else b:=-a.

Замените приведенные фрагменты, где возможно, более короткими

операторами Паскаля.

+4
Ответы (1)
  1. 4 августа, 14:37
    0
    1) похоже здесь ошибка if a? b

    7) Если остаток от деления а на 2 НЕ равен 3, то а увеличить на 1. Остаток от деления а на 2 никогда не будет равен 3, так что a:=a+1 более короткая запись

    8) если остаток от деления a на 2 равен или 1 или 0, и а больше нуля, то а сделать отрицательным. Так как остаток от деления на 2 всегда равен или 0 или 1, то более короткая запись if a<0 a:=-a

    9) если а - отрицательно, то b присвоить значение a, если больше

    , то сделать а отрицательным и b присвоить значение отрицаетльного
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Объясните, как будут выполняться фрагменты программ: 1) if ab then a:=a else a:=b; 7) if a mod 23 then a:=a+1; 8) if (a mod 2=1) or (a mod ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Задание Определить без компьютера, что будет напечатано при выполнении следующих фрагментов программ: 1. k:=20; k:=k+10; if k+1030 then k:=8 else k:=k-1; WriteLn (k) Ответ: 2. k:=20; k:=k+10; if k+10 = 30 then k:=8 else k:=k-1; WriteLn (k) Ответ: 3.
Ответы (2)
1. определить значение переменной А после выполнения оператора X:=5; if X>-3 then A:=X mod 2 else A:=abs (X) ; 2. определить значение переменной А после выполнения оператора X:=-26; Y:=6; if X div Y=4 then A:=X mod Y else A:=X*Y; 3.
Ответы (1)
Определить значение выражения: 1) 10 div 15 2) 10 div 2 3) 10 mod 2 4) 10 mod 17 5) 123 mod 10 6) 123 div 10 7) 1 div 2 8) 123 mod 1000 9) 100 mod 27 div 3 10) 100 div 5 mod 3 11) 98725 div 1000 mod 10 12) 100 mod 5 div 3
Ответы (1)
Найдите значение переменной "а" а:=12; b:=8; a:=2*b-a; if a>b then c:=a*b-a else c:=b*a-b s=25; if s mod 2 0 then begin s:=s-1; k:=s/2; end else k:=s; s:=377; if s mod I 10 = 7 then begin s:=s+3; k:=s/10 else k:=1;
Ответы (1)
2) являются ли условными операторами след. последовательности символов: a) if x < y then x : = 0 else y : = 0; b) if x > y then x : = 0 else read (y) ; d) if a < b then 100 else z : = 25;
Ответы (1)