1) y:= sin(sqr(x)+sqr(1));
2) y:= sqrt((sqr(x)*x+sqr(1)*1)/x);
3) y:= sqrt((sin(x)+abs(x))/abs(sqr(x)+sqr(2)));
Носи́тель информа́ции (информацио́нный носи́тель) — любой материальный объект или среда, используемый человеком, способный достаточно длительное время сохранять (нести) в своей структуре занесённую на него информацию, без использования дополнительных устройств (например, источника энергии).
Или другими словами чтоб тебе понятнее было
Носитель информации это например оптические (CD-ROM, DVD-ROM, Blu-ray Disc);
полупроводниковые (флеш-память, SSD-диски);
магнитные (магнитные ленты, дискеты, жесткие диски). И тд
Туда можно записать информацию и они ее там содержат
И это и называется носитель информации
Жесткий диск на него что то можно записать он носит информацию
Блок схемы не очень момню поэтому заменил блоки тэгами. Надеюсь, понятно.
<блок начало> Начало
<блок ввода данных> Ввести А, B </блок>
<блок действия> C:=(A+B)/2 </блок>
<блок дествия> D:=2*A*B</блок>
<блок проверки условия> A<b?</блок>
<если да>
<блок действия> A:=C</блок>
<блок дествия>B:=D</блок>
</если>
<если нет>
<блок действия> B:=C</блок>
<блок дествия>A:=D</блок>
</если>
<блок вывода>Вывести A,B<блок вывода>
<span><блок конца>Конец </блок></span>
0.4*1024*1024= 419430.4 Бит
var a: array [1..100,1..100] of integer;
b:array [1..100] of integer;
n,m,i,j:integer;
Begin
read(n,m);
for i:= 1 to n do
for j:= 1 to m do
read(a[i,j]);
for i:= 1 to n do begin
b[i]:=0;
for j:= 1 to m do
b[i]:=b[i]+a[i,j];
writeln('b[',i,'] = ',b[i]);
end;
End.