Дано:
T=300<em>c</em>
V=120<em>kb = 122880 байт </em>
R=8 <em>бит = 1 байт</em>
Найти:
<em>F</em>
Решение:
<em>V=FRTK </em>K=2
F= V/RTK= 1228800\2*1*300=204,8 гц
Быстрое и простое построение офисной локальной сети.
Отсутствие проводов.
Минимум строительно-монтажных работ.
Высокая скорость.
Дешевизна установки и владения.
Высокая мобильность рабочего места.
Реконфигурация и масштабируемость
Холодный утюг
Разбитую вазу
Чистое бильё
Ракета без топлива
Пустого кувшина
N=256 I=8 бит(1 символ)
информационый объем равен 1024*8=8192 бита
1)
var a:real;
begin
writeln('Введите число');
readln(a);
if(a>8) then writeln('Число больше восьми') else writeln('Число меньше восьми');
end.
2)
var a:longint;
begin
writeln('Введите число');
readln(a);
if(a mod 3 = 0) then writeln('Число делится на 3') else writeln('Число не делится на 3');
end.
3)
var a:longint;
begin
writeln('Введите число');
readln(a);
if(a mod 2 = 0) then writeln('Число чётное') else writeln('Число нечётное');
end.
4)
var a,b:longint;
begin
writeln('Введите числа');
readln(a,b);
if(a>b) then writeln(b) else writeln(a);
end.
5)
var a:longint;
begin
writeln('Введите число');
readln(a);
if(a>0) then a:=a+5 else a:=a-1;
writeln(a);
end.
6)
var a,i,k:longint;
begin
k:=0;
for i:=1 to 3 do begin writeln('Введите число'); readln(a); if(a>0) then k:=k+1; end;
writeln(k,' ','положительных чисел');
end.