Var x,y:real;
begin
writeln('Введите координаты точки');
readln(x,y);
if (x>=0)and(y>=0)and(y<=(-1)*x+6)and(y>=(-2)*x+4)then writeln('True')
else writeln('False');
<span>end.</span>
#include <iostream>
using namespace std;
void bin(int n);
int main()
{
int n;
cout<<"Введи число в десятичной системе счисления\n";
cin>>n;
bin(n);
system("pause");
return 0;
}
void bin(int n)
{
int binn[15], ;
for(int i=14;i>=0; i--)
{
binn[i]=n % 2;
n=n/2;
}
for(int i=0; i<=14;i++)
{
cout<<binn[i];
}
cout<<"\n";
}
Чуваши армения респ калмыгия ставроп край курган коши
Var
i:integer;
begin
i:=33300;
while (i mod 55 <> 0) do begin
i:=i+1;
end;
writeln(i,'/55=',i/55);
end.
Ответ:
1 байт = 8 бит
0.5 Кбайт = 512 байт
1)0.5×1024×8=4096 бит
2)500×8=4000 бит
3)4096-4000=96 бит
Ответ: На 96 бит информационный объём первого сообщения больше объёма второго сообщения.