Program test;
var s,s1:string;z:boolean;
begin
readln(s);
readln(s1);
z:=s.Contains(s1);
if z = true then writeln('В слове "',s,'" содержиться слово "',s1,'".')
else writeln('В слове "',s,'" не содержиться слово ',s1,'".');
<span>end.</span>
Ответ:
санкции против Huawei
Объяснение:
подозрение С.Ш.А. в соотрудничесте Хуавей с китайскими спец службами
ещё как вариант лабаротория Касперского запрет США ставить антивирус Касперского на карпаротивнные пк
28800 бит/с= 28800/8=3600 байт/с
72000/3600 = 20 с
Дано Шины адреса 36
Процессор 80386
Решения
80386 * 36 = <span>2893896</span>
var a,b,c:integer;
s,k,y:real;
begin
readln(a,b,c);
s:=sqrt(3*c*c*c+b*b*b*b*b)/(b-c);
k:=sqrt(s)+abs(-a*b*c);
y:=s+3*k-((s*s*s*s)/(b+c));
write(y:0:3)
end.