Задать вопрос
17 марта, 06:36

Задание

Определить без компьютера, что будет напечатано при выполнении следующих фрагментов программ:

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. p:=1; if p>0 then p:=p+5; Write (p) ; if p>10 then p:=p+1; Write (p)

Ответ:

4. p:=5; if p>0 then p:=p*2 else p:=12; if p>5 then p:=p-1 else p:=p+1; WriteLn (p) ;

Ответ:

5. p:=0; p:=p+1; if p=0 then p:=5 else p:=p-1; WriteLn (p) ;

Ответ:

6*. p:=5; p:=p*2; if p mod 2=0 then WriteLn (p) else WriteLn (0) ;

Ответ:

+3
Ответы (2)
  1. 17 марта, 09:06
    0
    Слева - значения переменной на момент их вывода.

    1. k=20

    k=20+10=30

    k=30=>k:=k-1=>

    k=29.

    2. k=20

    k=30

    k+1030=>k:=k-1=>

    k=29.

    3. p=1

    p>0=>p:=p+5=>

    p=6

    pp не изменяется

    p=6

    4. p=5

    p>0=>p=5*2=10

    p>5=>p=10-1=9

    p=9

    5. p=0

    p=1

    p0=>p=1-1=0

    p=0

    6. p=5

    p=5*2=10

    p mod 2=0=>выводим p

    p=10
  2. 17 марта, 09:48
    0
    1. k=20; k:=k+10; / / k=30

    if k+1030 then k:=8 / / k=40 оно не равно 30 = >ответ: k=8

    2. r=39

    3. p=6

    4. p=9

    5. p=0

    6. p=10
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Задание Определить без компьютера, что будет напечатано при выполнении следующих фрагментов программ: 1. k:=20; k:=k+10; if k+1030 then ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Определить без компьютера, что будет напечатано при выполнении следующих фрагментов: Определите без компьютера, что будет напечатано при выполнении следующих фрагментов программ: 1) a:=100; a:=10*a+1; WriteLn (a) 2) a:=100; a:=-a;
Ответы (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)
Сделать так чтобы Writeln был заменен другим словом и повторялься не больше двух раз program choise; var N_M:integer; writeln (' введи номер месяца ') ; readln (N_M) ; case N_M of 1:writeln (' январь ') ; 2:writeln (' февраль ') ;
Ответы (1)
Укажите условие выбора чисел, кратных 3, но не кратны 6: 1) (X mod 60) ; 2 (x mod 3=0) OR (x mod 6=0) ; 3) (x mod 3=0) AND (x mod 60) ; 4) (x mod 3=0) OR (x mod 60).
Ответы (1)
Расположите выражения сверху вниз в порядке возрастания их значений 1. 931 div 100 2. (1234 div 10) mod 10 3. 931 mod 100 4. (1234 mod 100) mod 10 5. (1234 div 100) mod 10 6. 931 mod 10 7.100 mod 10 8. 100 div 10
Ответы (1)