(8-2) +(5-2)+(3-2) =6+3+1 =10 учеников, посещающих несколько кружков
Всего посещений: 14+18+10 = 42
42 - 10=32 - количество учеников, посещающий кружки
36 - 32 = 4 - количество учеников, не посещающих кружки
Var k,i:integer;
begin
k:=1;
for i:=1 to 24 div 3 do
begin
k:=k*2;
writeln(3*i:3, ': k = ',k);
end;
end.
Результат:
3: k = 2
6: k = 4
9: k = 8
12: k = 16
15: k = 32
18: k = 64
21: k = 128
24: k = 256
// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018
begin
var (w, h) := ReadInteger2('w,h->'); // точка (w;h)
var (ox, oy) := (w / 2, h / 2); // находим координаты цента (0;0) и (w;h)
(w, h) := ReadInteger2('rw,rh->'); // ввод RW и RH
Println($'Координаты левой верхней вершины ({ox+h/2};{oy-w/2})'); // - половина высоты прибавляется и половина ширины вычитается
Println($'Координаты правой нижней вершины ({ox-h/2};{oy+w/2})'); // - половина ширины прибавляется и половина высоты вычитается
end.
Если моя математика не подводит, то должно быть верно.
Не(1*0)+(1+1) =1
1*(1+(1*не 0)*0=0
не (x=5) +(x>6) (вот тут не понимаю ,что нужно)
1 картинка: источник - молодой человек, приемник: девушка
2 картинка: источник - учитель, приемник - дети
3 картинка: источник - книги, приемник - читатель
4 картинка: источник - приемник: девушка, та что ниже и второй источник-приемник - девушка, та что выше