1. Что не является информационным процессом? ~Чтение
~запись
~Просмотр
~хранение
2. Процесс получения (сбора) информации называется...
~Запись
~Просмотры
~Чтение
~Обработка
3. В течение какого процесса происходит изменение формы представления информации?
~Обработка
~Чтение
~Просмотр
~Передача
4. Какие виды памяти существуют?
~Внутренняя и временная
~внешняя и долговременная
~длинная и короткая
~кратковременная и долговременная
5.Что из нижеперечисленного является лишним в процессе передачи информации?
~приёмник
~вид информации
~канал связи
~передатчик
Переведите 1023 в биты, запишите ответ
.
Переведите 6249512960 бит в МБайты, запишите ответ
.
Переведите 742 Мбайт в биты, запишите ответ
.
Переведите 946 Мбайт в байты, запишите ответ
.
Переведите 1048576 бит в Кбайты, запишите ответ
.
нужно,

👇

Открыть все ответы

Ответ:

2710200013

18.04.2020

Чтобы задать прямоугольник, достаточно указать координаты концов его диагонали, например, идущей из левого верхнего угла в правый нижний, т.е. две точки: B(x1,y1) и D(x2,y2). Но можно также задать и другую диагональ (AC). Если считать, что стороны прямоугольника параллельны осям координат то длины сторон могут быть найдены как
$l_1=|x_2-x_1|, \ l_2=|y_2-y_1|$
Тогда можно найти и периметр:
P=2(l_1+l_2)=2(|x_2-x_1|+|y_2-y_1|)

Нахождение периметра оформим процедурой Per(x1,y1,x2,y2,P)

procedure Per(x1,y1,x2,y2:real;var P:real);
begin
P:=2*(abs(x2-x1)+abs(y2-y1))
end;
var
x1,x2,y1,y2,p:real;

begin
Write('Введите координаты любой вершины прямоугольника: ');
Read(x1,y1);
Write('Введите координаты противоположной вершины прямоугольника: ');
Read(x2,y2);
Per(x1,y1,x2,y2,p);
Writeln('Периметр прямоугольника равен ',p)
end.

Тестовое решение:
Введите координаты любой вершины прямоугольника: 5 -7
Введите координаты противоположной вершины прямоугольника: -4 12
Периметр прямоугольника равен 56

4,7(51 оценок)

Ответ:

пророк2345

18.04.2020

Const
n=10;
var
a:array[1..n] of integer;
i,kp,sn: integer;

begin
Randomize;
Writeln('Элементы массива');
kp:=0; sn:=0;
for i:=1 to n do
begin
    a[i]:= Random(31)-10;
    Write(a[i]:4);
    if a[i]>0 then Inc(kp);
    if (i mod 2)<>0 then sn:=sn+a[i]
end;
Writeln;
Writeln('Количество положительных элементов: ',kp);
Writeln('Сумма элементов на нечетных местах: ',sn);
Writeln('Элементы массива после замены');
for i:=1 to n do
begin
    if a[i]<10 then a[i]:=10;
    Write(a[i]:4)
end;
Writeln
end.

Тестовое решение:
Элементы массива
10 11 -4 11 12 13 -1 -2 -8   7
Количество положительных элементов: 6
Сумма элементов на нечетных местах: 9
Элементы массива после замены
10 11 10 11 12 13 10 10 10 10

4,4(31 оценок)

Это интересно:

Взаимоотношения

23.03.2021

Как объяснить другу, что вам нужно свободное пространство...

Здоровье

06.02.2023

Как избавиться от изжоги народными средствами: решение проблемы без лекарств...

Мир-работы

07.11.2022

Как разговаривать на рабочем месте: секреты эффективного коммуникативного процесса...

Хобби-и-рукоделие