Условия на Паскале прилагаются.
Легко и просто берешь рисуешь по клетках его и все готово
Program prim;
uses crt;
var
y,x,a,modul,koren,kvad:real;
begin
writeln('Решаем пример:');
kvad:=sqr(x);
koren:=sqrt(x*a);
modul:=abs(a);
y:=(kvad-koren)/modul;
writeln(y);
<span>end.</span>
А) 1 байт = 8 бит
7 бит < 8 бит
7 бит < 1 байт.
б) 1 Кбайт = 1024 байт
1024 байт > 1000 байт
1 Кбайт > 1000 байт.
в) 1 Гбайт = 1024 Мбайт
1025 Мбайт > 1024 Мбайт
1025 Мбайт > 1 Гбайт.
Программа и результат представлены в изображениях