В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
galaninartem201
galaninartem201
12.03.2020 04:04 •  Информатика

1. К формальным исполнителям относятся: а) Компьютер б) Экскурсовод в) Стиральная машина г) Водитель 2. Алгоритм, в котором действия выполняются последовательно друг за другом, называют а) Разветвляющимся б) Последовательным в) Линейным г) Циклическим д) Прямым 3. Полную и сокращенную форму может иметь: а) Линейный алгоритм б) Разветвляющийся алгоритм в) Простой алгоритм г) Сложный алгоритм 4. При создании презентации организовать ветвление : а) Изображения б) Гиперссылки в) Заголовки г) Закладки

Показать ответ
Ответ:
Польха
Польха
11.07.2022 02:31
const n=10;
var
  i,k,min,max:integer;
  x,y:array[1..n]of integer;
  z:array[1..2*n]of integer;

function four(n:integer):string;
var s:string;
begin
repeat
  s:=s+IntToStr(n mod 4);
  n:=n div 4;
  until n=0;
result:=ReverseString(s);
end;

begin
for i:=1 to n do
  begin
  x[i]:=random(-10,10);
  y[i]:=random(-10,10);
  if (x[i] mod 2=0) and (x[i]>0) then
    begin
    k:=k+1;
    z[k]:=x[i];
    if k=1 then
      begin
      min:=z[1];
      max:=z[1];
      end;
    if z[k]>max then max:=z[k];
    if z[k]<min then min:=z[k];
    end;
  if (y[i] mod 2=0) and (y[i]>0) then
    begin
    k:=k+1;
    z[k]:=y[i];
    if k=1 then
      begin
      min:=z[1];
      max:=z[1];
      end;
    if z[k]>max then max:=z[k];
    if z[k]<min then min:=z[k];
    end;
  end;
write('Массив X:');
for i:=1 to n do write(x[i]:4);
writeln;
write('Массив Y:');  
for i:=1 to n do write(y[i]:4);
writeln;
write('Массив Z:');  
for i:=1 to k do write(z[i]:4);
writeln;
write('Измененный массив Z:');
for i:=1 to k do
   begin
   if z[i]=min then z[i]:=max
     else
     if z[i]=max then z[i]:=min;
   write(z[i]:4);
   end;
writeln;
write('Массив Z по основанию 4:');  
for i:=1 to k do   write(four(z[i]):4);
end.
0,0(0 оценок)
Ответ:
славаннее
славаннее
11.08.2022 13:50
2626  2618  2624 2628  2826  2426  1826   610 
+           -        -       -        -        +        +       +
26 26                                     24 26 18 26  6 10
99899                                    79899 19899 22244
4 плюсика. 
Из приведённых чисел могут получиться в результате работы автомата 4 числа. 
Это 2626, 2426, 1826, 610. 
В числах 2618, 2624 последовательности убывающие (26-18, 26-24).
В числах 2628, 2826 есть число 28, которое не может быть получено суммой трёх десятичных цифр, (максимум 9+9+9=27). 
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота