1.
program z2;
var a,g:real;
begin
readln(a);
g:=(a/22)*(56-22);
writeln(g:4:2);
end.
<span>
2.
program z3;
var n,a,b,c:integer;
sa,sb,sc:real;
begin
writeln('Ведите количество учеников:');
readln(n);
writeln('Введите сколько:5,4,3');
readln(a,b,c);
sa:=(a*100)/n;
sb:=(b*100)/n;
sc:=(c*100)/n; writeln('пятёрок:',sa:4:2,'%');
writeln('четвёрок:',sb:4:2,'%');
writeln('троек:',sc:4:2,'%');
<span>end. </span></span>
<span>276 = 100010100
276 постоянно делишь на 2, и остаток записываешь с конца к началу
</span><span>276/<span>2=138 остаток 0
</span></span><span>138/<span>2=69 остаток 0
</span></span><span>69/<span>2=34 остаток 1
остаток 0
остаток 1
остаток 0
</span></span>остаток <span>0
</span>остаток <span>0
</span>остаток 1
Это — "процесс изменения одного или нескольких ПАРАМЕТРОВ высокочастотного модулируемого колебания по закону информационного низкочастотного сообщения"
Например, U=Uo*sin(ωt+φ); Если амплитуда Uo в свою очередь изменяется, то суммарное колебание будет амплитудно-модулированным
LPT порт - это то место в компе куда подключается принтер. Но туда можно воткнуть ещё много чего интересного. В том числе и придуманые вами схемы. У меня, например, через LPT порт включался свет в комнате, открывался замок на двери и выключалось радио.
Шины, как известно, используются для передачи данных от центрального процессора к другим устройствам персонального компьютера. Для того, чтобы согласовать передачу данных к отдельным компонентам, работающих на своей частоте, используется чипсет – набор контроллеров, конструктивно объединенных в Северный и Южный мосты. Северный мост отвечает за обмен информацией с оперативной памятью и видеосистемой, Южный – за функционирование других устройств, подключаемых через соответствующие разъемы – жесткие диски, оптические накопители, а также устройств, находящихся на материнской плате (встроенная аудиосистема, сетевое устройство и др. ), и для внешних устройств – клавиатура, мышь и т.д.
Схема системной платы показана ниже.
Program Z1;
Var x,y:real;
begin
Write('Введите значение x = ');
Readln(x);
if x>=1 then y:=5*x else y:=sqr(x);
Write('y=',y);
End.
Пример:
Введите значение x = 3
y=15