Даны формулировки определений различных терминов и понятий. Ваша задача – указать само понятие. В каждом случае нужно указать общее понятие, а не число , название программы или приложения. 1) Целенаправленный процесс изменения содержания или формы представления информации. 2) Процесс преобразования информации из непрерывной формы представления в дискретную. 3) Количество символов в алфавите. 4) Центральная микросхема ПК, к которой подключены все остальные устройства системного блока (в том числе и процессор) и через которую происходит обмен информацией между устройствами, их питание электроэнергией. 5) Основное устройство для долговременного хранения программ и данных, совмещающее в себе накопитель (дисковод) и носитель (диск 6) Описание на формальном языке («понятном» компьютеру) последовательности действий, которые необходимо выполнить над данными для решения поставленной задачи. 7) Прикладная программа для создания и обработки текстовых документов. 8) Специальные программы, управляющие работой подключенных к компьютеру устройств. 9) Процесс оформления текстового документа без изменения его содержания. 10) Технология, обеспечивающая одновременную работу со звуком, видео, анимацией, изображениями, таблицами и текстом в интерактивном режиме.
Ответы
Const
n = 20;
var
T: array[1..n] of integer;
i, k: integer;
begin
Randomize;
Writeln('Элементы массива');
k := 0;
for i := 1 to n do
begin
T[i] := Random(11)-5;
Write(T[i]:3);
if ((i mod 2)<>0) and (T[i]=0) then Inc(k);
end;
Writeln;
Writeln('Количество нулевых элементов на нечетных местах равно ',k);
end.
Тестовое решение:
Элементы массива
2 5 -4 4 3 -2 5 -5 -1 -2 5 2 0 -5 -5 -4 -3 3 0 1
Количество нулевых элементов на нечетных местах равно 2
const
n = 18;
var
T: array[1..n] of integer;
i: integer;
begin
Randomize;
Writeln('Элементы массива');
for i := 1 to n do
begin
T[i] := Random(51)-25;
Write(T[i]:4);
end;
Writeln;
Writeln('Результат');
for i := 1 to n do
begin
if ((i mod 2)<>0) then T[i] := 0;
Write(T[i]:4);
end;
Writeln;
end.
Тестовое решение:
Элементы массива
23 -6 8 14 15 12 -24 20 -11 -7 4 -24 22 -19 12 -6 21 17
Результат
0 -6 0 14 0 12 0 20 0 -7 0 -24 0 -19 0 -6 0 17
n = 20;
var
T: array[1..n] of integer;
i, k: integer;
begin
Randomize;
Writeln('Элементы массива');
k := 0;
for i := 1 to n do
begin
T[i] := Random(11)-5;
Write(T[i]:3);
if ((i mod 2)<>0) and (T[i]=0) then Inc(k);
end;
Writeln;
Writeln('Количество нулевых элементов на нечетных местах равно ',k);
end.
Тестовое решение:
Элементы массива
2 5 -4 4 3 -2 5 -5 -1 -2 5 2 0 -5 -5 -4 -3 3 0 1
Количество нулевых элементов на нечетных местах равно 2
const
n = 18;
var
T: array[1..n] of integer;
i: integer;
begin
Randomize;
Writeln('Элементы массива');
for i := 1 to n do
begin
T[i] := Random(51)-25;
Write(T[i]:4);
end;
Writeln;
Writeln('Результат');
for i := 1 to n do
begin
if ((i mod 2)<>0) then T[i] := 0;
Write(T[i]:4);
end;
Writeln;
end.
Тестовое решение:
Элементы массива
23 -6 8 14 15 12 -24 20 -11 -7 4 -24 22 -19 12 -6 21 17
Результат
0 -6 0 14 0 12 0 20 0 -7 0 -24 0 -19 0 -6 0 17
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
что-то у меня ничего не получается.
Автор: AnastasiyaSkripin1283
Составьте алгоритм с условием х+у меньше 0. за !
Автор: volkovaoksana19806037
Яке з посилань є відносним? $А42, А42, А, А 4.
Автор: kondrashovalf6404
функция манин есептейтин программа курастыр
Автор: myliar21585356
Решите тест, , занят , поэтому времени готовиться нету. он простой
Автор: pronikov90
count : integer;
tovar: string;
begin writeln('Введите исходные данные: ');
writeln('Какой товар вы покупаете? ');
readln(tovar);
writeln('По какой цене? ');
readln(cost);
writeln('Сколько штук? ');
readln(count);
summa := cost*count; writeln('Ваш товар - ', tovar, '. Стоимость покупки: ',summa:0:2); writeln('Сколько денег даете? ');
readln(money);
if money=summa then writeln('свободен, под расчёт') else if money > summa then writeln('Ваша сдача: ', money-summa) else writeln('Нужно добавить: ', summa-money,. ');
end.