Можно реализовать через строки, но вы видимо только начали проходить Паскаль, поэтому такой вариант ;-)
незняю как проверку делать но вот ответы
№3
1001100110(2)
№4
101000010(2)
2018₁₀=7E2₁₆ (решение на картинке 1) = 3742₈ (картинка 2)
528,24₁₀=1000010000.00111101011₂ (картинки 3) = 1020.17270243656₈ (картинки 4) = 210.3D70A3D70A4₁₆ (картинки 5)
Программы на Кумире прилагаются.
program xyz;
var x,y,z,a,b,c:real;
begin
readln(x,y,z);
x:=(sqrt(a)+b)/2*a;
y:=sqrt(abs((3*x+4)/(1-2*x)));
z:=abs(sqr(Cos(x)))/(Ln(1+y));
writeln(z);
end.