Привет!
Тематика это: Тема о которой идёт речь, допустим говорят два повара, они говорят о еде, тематика: готовка еды
А в свою же очередь аудитория это те люди которые слушают, допустим есть ТВ канал, у него есть аудитория ( например 5 миллионов человек ). Аудитория делится на группы:
0+ Все
6+ От 6 лет
12+ От 12 лет
16+ От 16 лет
18+ От 18 лет
Так же, в соответствии с законом РФ, указывать рекомендованный возраст, это называют так:
0+ Для всех
6+ Для детей
12+ Для подростков
16+ Для тех кому исполнилось 16 лет ( Или же см. обозначение 12+ )
18+ Запрещено для детей
Var
N, i, k, sum, t: integer;
begin
readln(N);
k := 0;
for i := 100 to 999 do
begin
t := i;
while t > 0 do
begin
sum := t mod 10;
t := t div 10;
end;
if sum = N then k := k + 1;
end;
writeln(k);
end.
сори за почерк, а так уверен, в этом, думаю поймешь
Ответ:
var a:array [1..14] of real;
i:integer;
s:real;
begin
s:=0;
write('Массив: ');
for i:=1 to 14 do
begin
a[i]:=random()+random(3);
write(a[i]:0:3,' ');
s:=s+a[i]
end;
writeln;
write('Сумма чисел равна ',s:0:3)
end.
2 рицарі, 1 повертається,забирає ще 1 риц., поверт., виходить з лодки, сідають 2 зброєносці, 1 поверт., забирає ще одного, назад повертається рицар і забирає останнього рицаря