tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Преоброзить масив таким образом,что
Преоброзить масив таким образом,что бы елементы,равные нулю,размещались послех всех других
fara30
3 28.06.2019 15:50
0
Ответы
krasotkak31
22.07.2020 19:52
Pascal
const n = 5;
var a : array [1..n] of integer;
i,p : integer;
begin for i := n downto 1 do
begin
if a[i] = 0 then
begin
a[i] := a[n-p];
a[n-p] := 0;
p := p +1;
end;
end;
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Kari200511
14.06.2019 03:20
Считая,что каждый симво кодируется 16-ю битами оцините информационный обьем следующей фразы в кодировки unicode. в шести литрах 6000 миллилитров...
blablabla114
13.05.2019 08:19
Порядок действий при абсолютной адресации....
МарияЧархчян
13.05.2019 08:17
Даны авс заменить эти числа на кубы ...
Ольга198414
13.05.2019 10:14
Информатика 6 класс. в системе программирования pascai авс составьте программы для создания следующих изображений грибок .как его обозначить правильно. урок 27 , л.г...
kirillsolodov20
27.10.2020 15:42
я за информатику вообще не шарю...
zebra60
27.10.2020 15:41
3. Фрагмент документа (команда, текст, заголовок, зображення, примітка), що посилається на інший елемент у самому документі або на інший об єкт, який розміщено на...
r8n73x9999
27.10.2020 15:41
Для эффективной борьбы с компьютерными вирусами необходиморегулярно...
Анастасия2787
27.10.2020 15:41
Информатика Егэ 11 класс , символом f обозначено одно из указаных ниже логических выражений...
Dbrfsdfsd
09.11.2019 08:23
5. выберите верное утверждение: а) в корневом каталоге могут располагаться каталоги и файлы: б) в корневом каталоге могут располагаться только каталоги: в) в корневом...
Maksim9999v
09.11.2019 08:25
8. задан полный путь к файлу: d: \gamelines.exe. каково имя каталога? a) gameб) d: \gamelines lines.exeb) d: г) lines.exe...
Популярные вопросы
Решить : продали 32% всех яблок, после чего осталось продать ещё...
1
Дать определение понятия морфемика . рассказать о значимых частях...
2
С70490-8520/x=70277,х*38-901=20379....
1
Укажите органеллу, которая принимает участие в формировании лизосом:...
3
Найдите значение выражения x*x-1,06 если x=1,2...
1
Система контроля стадиона включает 2 этапа. на первой стадии 60%...
2
Роль сусликов в процессе образования почвы...
3
Лифт поднимает груз на высоту 10 м за 1 мин. найти силу тока если...
1
Допиши глаголы . 1) my cat 2) my cat can...
2
Сравните значения выражений: 1) 4^-1 * 5^-1 и 20^-1 2) 3^-1 - 4^-1...
2
const n = 5;
var a : array [1..n] of integer;
i,p : integer;
begin for i := n downto 1 do
begin
if a[i] = 0 then
begin
a[i] := a[n-p];
a[n-p] := 0;
p := p +1;
end;
end;