Pascal
Надо что-то исправить, чтобы процедура "poparno" меняла местами попарно рядом стоящие элементы выводимых массивов, а пока что оно выполняет функцию рандомно, не учитывая массивов
type
mas=array[1..20] of integer;
var mas1, mas2 :mas;
Procedure Form(var mas1: mas; size:byte);
var i:byte;
begin
for i:=1 to size do
mas1[i]:=random(256);
end;
Procedure vivod(mas1: mas; size: byte);
var i: byte;
begin
for i:=1 to size do
write(mas1[i]:5);
end;
function nenul (mas1: mas; size: byte): integer;
var
i,k: byte;
begin
k:=0;
for i:=1 to size do
if mas1[i]<>0 then k:=k+1;
nenul:=k;
end;
procedure poparno(var mas1: mas; size: byte; x:integer);
var
i:byte;
begin
for i:=1 to size do
begin
mas1[i]:=random(256);
end;
i:=1;
while i begin
x:=mas1[i];
mas1[i]:=mas1[i+1];
mas1[i+1]:=x;
i:=i+2;
end;
end;
var size:byte;
k,x:byte;
begin
form(mas1, 10);
writeln('массив F ');
vivod(mas1, 10);
writeln;
writeln('Количество ненулевых элементов = ', nenul(mas1, 10):5);
poparno(mas1, 10, x);
vivod(mas1, 10);
form(mas2, 20);
writeln;
writeln;
writeln('Массив P ');
vivod(mas2, 20);
writeln;
writeln('Количество ненулевых элементов = ', nenul(mas2, 20):5);
poparno(mas2, 20, x);
vivod(mas2, 20);
end.
1 . Какая программа не является электронной г) Word
2. Как называется документ в программе Excel?
б) книга
3. Рабочая книга состоит из…
б) нескольких рабочих листов
4. Наименьшей структурной единицей внутри таблицы является..
б) ячейка
5.
г) картинки
6. Значения ячеек, которые введены пользователем, а не получаются в результате расчётов называются…
в) исходными
7. Укажите правильный адрес ячейки.
б) Р6
8. К какому типу программного обеспечения относятся ЕТ?
в) к прикладному
9 Тест. Формула - начинается со знака…
в) =;
10. Какая ячейка называется активной?
в) заполненная
1 string - тип данных строка (любые символы), используются при наборе текста.
integer - тип данных число(цифры), используется ТОЛЬКО цифры.
2 Общий формат - это string (в нужных программах). Например при вводе года рождения пользователя
3 Конкатенация - формат типа integer в string. В некоторых языках программирования это важно. Например python
4 Числовой тип, только цифры. Текстовой любой тип. Формула в Excel это алгоритм выполнения функции. Формула начинается со знака "=".
Используется знаки *, /, : ,+, ^
5 пункта нету
6 Относительный ссылки, чтобы сделать относительную ссылку нужно перед буквой или цифрой поставить знак "$". Чтобы при протягивании формулы по клетками, в формуле автоматически не менялось, то значение, перед котлрым стоит знак "$"
7 Относительная ссылка - "$B3-D1"
Абсолютная ссылка - "B3 -D1"