Excel ! -- Решить графически уравнение ln3х – 3lnх = 0. Примечание. Постройте таблицу значений функции для х ∈ [0,1; 6,3] с шагом 0,2.

program z1;

var a:array [1..6] of integer;

i,s:integer;

begin

s:=0;

randomize;

write ('Массив: ');

for i:= 1 to 6 do

begin

a[i]:=random(18);

write(a[i],'  ');

s:=s+a[i]

end;

writeln;

writeln ('Сумма элементов массива: ',s);

writeln ('Среднее арифметическое элементов массива: ',s/6:0:1)

end.

Объяснение:

Цикл:

1) присваиваем значение текущему элементу массива

2) выводим текущий элемент массива на экран

3) считаем сумму элементов массива

Выводим сумму элементов массива на экран

Выводим среднее арифметическое элементов массива на экран (делим сумму на количество элементов), используя форматированный вывод (указываем после второго двоеточия количество знаков после запятой при выводе числа)

Номер 1

На каникулах мы пойдем в театр или в цирк

Пусть А- поход в театр, B - в цирк

F = A∨B

15 делится на 3 и на 5

Пусть А- 15 делится на 3, B - 15 делится на 5

F= A∧B

Если сумма цифр числа делится на 3 без остатка, то число делится на 3

Пусть А - число делится на 3 без остатка, B - число делится на 3

F= A⇒B

Номер 2

Высказывание A∨B дает объединение множеств A и B. Обозначим истинность выражения за 1, а ложь за 0

Получается, если A = 0, B=0 A∨B - ложно

A=0, B=1  A∨B - истинно

A=1, B=0  A∨B - истинно

A=1, B=1  A∨B - истинно

Номер 3

Действия выполняются сначала в первой скобке

((1∨0)∨1)∨0)= (1∨1)∨0=1∨0=1 (т.к 1∨0 или 0∨1 всегда истинно(=1))

Номер 4

Высказывание A={3=6}. Это ложное высказывание, т.к 3≠6. Т.е А=0

Высказывание B={2<3}. Это истинное высказывание, т.к 2<3. Т.е B=1

Высказывание C={4<1}. Это ложное высказывание, т.к 4>1. Т.е C=0

Перепишем высказывание из задания и подставим в него найденные значения:

(0∨¬1)∧¬(¬0∨1)

Как известно ¬0=1, ¬1=0 (отрицание) ⇒ (0∨0)∧¬(1∨1) = 0∧¬1=0∧0=0