4 года назад

Что такое запись в информатике

Знания

Информатика

1 ответ:

Владимир0177 [1]4 года назад

0 0

Запись - это строка таблицы, содержащая набор значений свойств, размещенный в полях базы данных.

Читайте также

Помогите закрасить треугольник,используя floodfillКод: program AnimROB; uses crt, graph; var grDriver, grMode: integer; var x, y

сергей9781

{ Пример программы для процедуры FloodFill }
Uses Graph,Crt; 
Var Gd, Gm : Integer; 
Begin 
Gd:=Detect; 
InitGraph(Gd, Gm, ''); 
If GraphResult <> grOk Then Halt(1); 
SetColor(GetMaxColor); 
Circle(50, 50, 20); 
FloodFill(50, 50, GetMaxColor); 
Readkey; 
CloseGraph; 
End. 

Procedure FloodFill(X, Y : Integer; Border : Word); 
Закрашивает замкнутую область, используя текущие стиль и цвет закраски. 

Procedure SetFillStyle(Pattern : Word; Color : Word); 
Устанавливает цвет и стиль закраски. 

Procedure SetColor(Color : Word) 
устанавливает текущий цвет,

0 0

4 года назад

Помогите прошу вставте пропущенные буквы которые съели жуки ! на ___лке есть кн__г__. н__ __олке нет __хм__т. н__ ___лке б__ль__

romanoff n

на ПОлке есть кнИгИ. нА Полке нет __хм__т. нА ПОлке бОльШе. МестО ИгруШек.

0 0

3 года назад

Доказать с помощью законов алгебры логики

Ahsana [7]

(A→(B→C))→((A→B)→(A→))≡1
(¬A+¬B+C)→(A*¬B+¬A+C)≡1
A*B*¬C+A*¬B+¬A+C≡1
A*(B*¬C+¬B)+¬A+C≡1 (применяем формулу: A+¬A*B=A+B)
A*(¬B+¬C)+¬A+C≡1
¬A+¬B+¬C+C≡1 (C+¬C=1)
1≡1

0 0

4 года назад

Два текста содержат одинаковое количество символов. первый текст составлен в алфавите мощностью 4 символов, а второй 16 символов

KolosovDm1

Ответ:

Объяснение:

Надо найти V2/V1.

x - кол-во символов. По условию x1=x2=x.

V2=x*16;

V1=x*4

Делим уравнения и получаем: V2/V1=4

0 0

3 года назад

Дано N целых чисел. Найти количество элементов последовательности, у которых равные соседи (слева и справа). Последовательность

kokra99 [56]

Ответ:

program Test;

var

a: array of Integer;

n, i, c, left, right: Integer;

begin

Write ('Введите N: ');

ReadLn (n);

SetLength (a, n);

Write ('Введите элементы массива:');

for i := Low (a) to High (a) do

Read (a [i]);

c := 0;

for i := Low (a) to High (a) do begin

if i > Low (a) then

left := i - 1

else

left := High (a);

if i < High (a) then

right := i + 1

else

right := Low (a);

if a [left] = a [right] then begin

Inc (c);

Write (i + 1, ' '); //для проверки

end;

WriteLn;

WriteLn ('Количество = ', c);

ReadLn; ReadLn;

end.

0 0

4 года назад