Отправитель<span>, стремящийся оказать на </span>получателя<span> то или иное воздействие, передает ... </span>Получателю<span> для пониманий </span>информации<span> не -. обходимо декодировать ... Полный единичный цикл коммуникации, или простая </span>схема<span> ее структуры, ... </span>отправителя<span> и </span>получателя информации, но и сам процессобмена<span> ...</span>
Ответ: 1 набор
Объяснение:
Этот набор можно разложить так:
1=1
2=2
3=1+2
4=4
5=4+1
6=4+2
7=4+2+1
8+8
9=8+1
10=8+2
11=8+1+2
12=8+4
13=8+4+1
14=8+4+2
15=8+4+2+1
В приведенном фрагменте программы после начального присваивания s:=0 будет выполняться цикл. В теле цикла находятся 2 оператора - в первом операторе вычисляется значение s, во втором - вычисленное значение выводится на экран. Анализ работы цикла:
j=10, s=s+2*j=0+2*10=20, вывод на экран 20
j=11, s=20+2*11=42, вывод на экран 42
<span>j=12, s=42+2*12=66, вывод на экран 66
</span>j=13, s=66+2*13=92, вывод на экран 92
j=14, s=92+2*14=120, вывод на экран 120
<span>j=15, s=120+2*15=150, вывод на экран 150
</span>Таким образом, на экран будет выведено: 20426692120150
Program dfgdf;
var
m,o,r,f:real;
begin
writeln('оценку по математике введите');
readln(m);
if (m>=1) and (m<=5) then
begin
writeln('оценку по русскому введите');
readln(r);
if (r>=1) and (r<=5) then
begin
writeln('оценку по физике введите');
readln(f);
if (f>=1) and (f<=5) then
begin
o:=(m+f+r+5)/4;
writeln('средняя оценка = ',o);
end
else
begin
writeln('не корректный ввод!!!');
end;
end
else
writeln('не корректный ввод!!!')
end
else
writeln('не корректный ввод!!!')
<span>end.</span>
Var x1,y1,x2,y2,r:real;
begin
readln(x1,y1);
readln(x2,y2);
r:=sqrt(sqr(x2-x1)+sqr(y2-y1));
writeln(r:5:3);
end.
Пример:
1. 1.
2. 2.
<span>1.414</span>
