М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
St9747
St9747
03.03.2021 20:35 •  Информатика

Решить в паскале абс. дан одномерный массив,состоящий из 5 элементов, необходимо вывести на экран рассортированный массив таким образом,чтобы числа лежащие в диапазоне от 10 до 20 и от 80 до 90 были выведены в левой части,а остальные в правой. если можно,то и объясните

👇
Ответ:
Vivy12
Vivy12
03.03.2021
Программа с комментариями в прикрепленном файле
4,7(38 оценок)
Открыть все ответы
Ответ:
alina56737
alina56737
03.03.2021
PROGRAM A22;
const
    max = 42;
var
    vt:array[1..max]of byte;
    i,n:byte;
    x:integer;

BEGIN
  n := max;
  writeln('Массив из n элементов будет задан случайными числами на интервале [0,3].');
  readln(n);  
  write('Введите число которое будет добавлено к каждому элементу.');
  readln(x);  

  writeln('Начальный Массив' );
  randomize;
  for i:=1 to n do begin
    vt[i]:=random(1,3);
    write(vt[i], ' ');
  end;
  writeln(' ');
 
  writeln('Массив c результатом' );
  for i:=1 to n do begin
    write(vt[i]+x, ' ');
  end;
  writeln(' ');
 
END.

Массив из n элементов задан случайными числами на интервале [0,3] прибавьте к каждому элементу число
4,8(77 оценок)
Ответ:
Rororor11111
Rororor11111
03.03.2021
В программе использованы команды эмулятора машины Поста К.Полякова:
> N переместить каретку вправо на 1 ячейку и перейти к строке с номером N
< N переместить каретку влево на 1 ячейку и перейти к строке с номером N
0 N записать в текущую ячейку «0» (стереть метку) и перейти к строке с номером N
1 N записать в текущую ячейку «1» (поставить метку) и перейти к строке с номером N
? N, M если текущая ячейка содержит «0» (не отмечена), то перейти к строке с номером N, иначе перейти к строке M
. остановить программу
Написать для машины поста программу сложения двух чисел, записанных на ленте и расположенных через о
4,6(50 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ