2.
4000/10*8/400=8
Ответ: о)
3.
1)0,5*1024*8=4096кбит
2)4096/128=32 сек
Ответ Н)
4.
10800/(28800/8)=3
Ответ T)
Var a,b: integer;
c: real;
begin
writeln('Введите сумму денег приёма 2-ух врачей');
readln(a,b);
c:=(a+b)/2;
writeln(c);
end.
После выполнения кода значение переменной K будет равно 3.
//PascalABC.Net 3.2
begin
var x:=readinteger ('Введите x: ');
write ('y=', sqr(1-x*x+5*sqr(x*x)) );
end.