ПО МО ГИ ТЕ ! Выберите ложные равенства.
1Кбайт = 1024 бит
1024 бит ≤ 1Гбайт
1024 бит = 1Мбайт
1Мбайт = 1024 бит

1,3,4

Объяснение:

2. 1 бит = 1,25e-10 гб.

≤ это если что обозначает либо меньше либо равно в данном случае меньше.

Соответственно 1,3,4 не верные.

2 var  3 s: string;   4 begin  5  readln(s); 6  while  pos('с',s)> 0  do  delete(s,pos('с',s),1); 7writeln(s);   8 end.это точно

var

s,a,n,i,min,max: integer;

begin

min: =32767;

max: =-32768;

readln(n);

for i: =1 to n do

begin

readln(a);

if a< min then min: =a;

if a> max then max: =a;

end;

s: =(min+max)/2;

writeln(s);

end.