1. а) Петя едет в автобусе, читает книгу и насвистывает. б) Петя насвистывает, когда едет в автобусе или читает книгу. в) Петя едет в автобусе и читает книгу или насвистывает. г) то же, что и а). д) Петя едет в автобусе или читает книгу и насвистывает. 2. а) Число 5-простое = 1. б) Луна-спутник Венеры = 0. в) Число 5-простое и Луна-спутник Венеры = 0. г) Число 5-простое или Луна-спутник Венеры = 1. д) Если число 5-простое, то Луна-спутник Венеры = 0. е) Число 5-простое тогда и только тогда, когда Луна-спутник Венеры = 0. 3. а) 1999<2000 и 1999>2000 б) Петя решил все задания контрольной работы и Петя не решил все задания контрольной работы в) Неверно, что луна спутник Земли и Неверно, что луна не является спутником Земли г) Мишень поражена не первым выстрелом и Неверно, что мишень поражена не первым выстрелом. 4. А=1, В=0, С=1, Д=0.
// Дан массив целых чисел. Все нечетные элементы удвоить, а четные уменьшить вдвое.
var a: array [1..10] of real; // возьмем массив из 10 чисел i,x :byte; begin randomize; for i:=1 to 10 do //заполняем исходный массив случайными числами (до 1000) begin a[i]:=random(1000); writeln (i,' элемент исходного массива ',a[i]); end; writeln (); for i:=1 to 10 do begin x:=i mod 2; //определяем четный или нет элемент массива if x=0 then //если элемент четный begin a[i]:=a[i]/2; writeln (i,' элемент массива - четный ',a[i]); end else //если элемент нечетный begin a[i]:=a[i]*2; writeln (i,' элемент массива - нечетный ',a[i]); end; end; end.
L = 64