Войти Регистрация Спроси ai-bota

Элементы массива, равные ноль, заменить на 1. как это записать в паскале?

Ответ:

tamer20052

04.10.2020 06:56

Для 10 элементов

for i:=1 to 10 do
if a[i]=0 then a[i]:=1;

0,0(0 оценок)

Популярные вопросы: Информатика

Эмиль08072013

27.12.2022 14:06

Расскажи про слово мышь .в каком случае это просто слово,а в каком -термин....

ьпдомощопаг

17.12.2021 06:45

Напиши назначения устройств 1 оперативная память2сетевой адаптер3 процессор4 жёсткий диск5 видео адаптер6 звуковой адаптер...

platonnikitos

28.08.2022 02:45

Назвіть основні особливості кодування даних у комп ютерних системах...

аня535767

02.12.2020 19:11

Задание 1 графические примитивы-это 1.геометрические фигуры 2.простые рисунки 3.прямые линии,дуги кружности,прямоугольники,закраски и т.дзадание 2 программы векторной графики работают...

1232508

22.02.2022 05:07

Какие периферийные устройства обязательно должны быть в составе ПК. принтер,клавиатура, блок питания, монитор, мышь,колонки.Выберите все правильные варианты ответа...

kristinakarpova2

09.05.2021 22:43

Какой тип должна иметь переменная, хранящая вес почтового отправления?Выбери правильный ответАцелочисленныйБвещественныйВмножествоГлогический...

llllsaaaaaa

24.08.2022 10:34

Очень нужно! нужно написать программу на языке питон. Задача: Даны три числа. Напишите программу, которая выводит количество одинаковых чисел в этой цепочке....

Женя8а

13.05.2022 04:54

Какое из множеств определяет значение логического выражения А И В (A & B), если: А={1; 3; 5;7;9} В={1;2;3;4} 1. {1;2;3;4;5;7;9} 2. {1;3;5;7} 3. {1;3} 4. {1} Задание 2 Для какого...

Zxcvvn

14.11.2022 03:21

Пишет: ошибка. программа завершена из за переполнения стека. паскаль. , . вот программа: program alisa_5; const n=10; var i: integer; a: array [ 1 .. n] of integer; procedure sort...

Дллллллллллл

01.11.2020 22:45

Аня написала все целые числа в промежутке (65; 101) в восьмеричной системе счисления. ваня стер все числа, содержащие цифру 7. найдите сумму оставшихся чисел в восьмеричной системе...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку