Var s1,s2:string; i:integer;
Begin
readln(s1);
for i:=1 to length(s1) do
s2:=s2+s1[i]+' ';
writeln(s2);
readln;
end.
Ответ: <span>составная часть презентации,содержащая различные объекты,называется слайд
</span>
V=i*T*D*1=16*10*44100=<span>
7056000 бит/8/1024=</span><span>
<span>861,328125Кбайт</span></span>
Var a, x: longint;
begin
readln (a);
x:=-a;
writeln ('x1=0');
writeln ('x2=',x);
end.
Не будем лишний раз ломать себе голову, пусть компьютер своей прямой обязанностью занимается:
javascript:
var число = 3n ** 300n + 9n ** 200n + 27n ** 100n - 2n * 3n ** 150n + 13n, единиц = 0;
while (число > 0n) { let разряд = число % 3n; if (разряд == 1n) единиц++; число /= 3n; }
alert(единиц);
Итого: 6.