Var
y,x:real;
begin
writeln('Введите значение x: ');
readln(x);
if x>7 then
writeln('y = ',x-3)
else
if x<-5 then
writeln('y = ',4*sqr(x))
else
writeln('y=5');
end.
Старый друг лучше двух новых
<span>1. дисплей
</span><span>5. графический редактор</span>
В одном килобайте 1024 байт, в одном байте 8 бит.
а) 200 байт < 256 байт = 0,25 Кб
б) 3 байта = 3 * 8 бит = 24 бита
в) 1536 бит < 1536 байт = 1,5 Кб
г) 1000 бит < 1024 байт = 1 Кб
д) 8192 байт > 1024 байт = 1 Кб