Какое значение примет переменная y после выполнения фрагмента программы. Сделать трассировочную таблицу или прописать действия в столбик.
y:=1;
x:=11;
while x>0 do
begin
x:= x-3;
y:= y+x
end;

4. Какому логическому выражению соответствует таблица истинности
A B F
0 0 1
0 1 0
1 0 0
1 1 0

1) A & B 2) A v B 3) ⌐(A & B) 4) ⌐A & ⌐B

125

296

Посмотреть ответы 2

Ответы на вопрос:

glokol

Информатика

4,7(79 оценок)

3. 15

4. 4) ⌐A & ⌐B

Объяснение:

y = 1 x = 11

пока условие x > 0 истинно (да) выполняется цикл

Действия в цикле:

1) x = x - 3

2) y = y + x

y = 1 x = 11

11 > 0 (да) выполняется цикл

Действия в цикле:

1) x = x - 3 = 11 - 3 = 8

2) y = y + x = 1 + 8 = 9

y = 9 x = 8

8 > 0 (да) выполняется цикл

Действия в цикле:

1) x = x - 3 = 8 - 3 = 5

2) y = y + x = 9 + 5 = 14

y = 14 x = 5

5 > 0 (да) выполняется цикл

Действия в цикле:

1) x = x - 3 = 5 - 3 = 2

2) y = y + x = 14 + 2 = 16

y = 16 x = 2

2 > 0 (да) выполняется цикл

Действия в цикле:

1) x = x - 3 = 2 - 3 = -1

2) y = y + x = 16 + (-1) = 16 - 1 = 15

y = 15 x = -1

-1 > 0 (нет) цикл не выполняется

y = 15 x = -1

Составим таблицу истинности для каждого выражения (смотри картинку)

Какое значение примет переменная y после выполнения фрагмента программы. Сделать трассировочную табл

gevochki

Информатика

4,7(98 оценок)

program vigod; uses crt; const n = 12; m = 13; var a: array[1..n,1..m] of integer; i, j, max: integer; begin writeln('*** alphaues is ***'); writeln('*** ok ***'); {заполняем массив случайными числами} randomize; for i: =1 to n do for j: =1 to m do begin a[i,j]: =random(101)-50; if a[i,j] mod 3 = 0 then max: =a[i,j]; end; {находим нужный элемент и выводим массив} for i: =1 to n do begin for j: =1 to m do begin if (a[i,j] mod 3 = 0) and (a[i,j]> max)then max: =a[i,j]; write(a[i,j]: 4); end; writeln(); end; writeln(); writeln('максимальный элемент кратный 3, равeн ',max); end.проверено - работает на паскаль авс