Дан массив заменить все его элементы ., большие заданного N, этим числом. паскаль

292

396

Посмотреть ответы 2

Ответы на вопрос:

даша33100

Информатика

4,6(81 оценок)

Программа:

Pascal:

var

arr: array[1..10] of integer;

N, i: integer;

begin

write('N = '); readln(N);

// заполняем массив случайными числами от 0 до 100

for i := 1 to 10 do arr[i] := random(100);

writeln(arr);

for i := 1 to 10 do

if arr[i] > N then arr[i] := N;

writeln(arr);

end.

Результат:

N = 50

[35,24,57,10,99,50,44,67,93,89]

[35,24,50,10,50,50,44,50,50,50]

yanarem1

Информатика

4,5(24 оценок)

1. г 2. б 3. г 4. б 5. г 6. в 7.в 8. б 9. б 10. а 11. г 12. 10 битов - 20 битов - 2 байта - 1 Кбайт - 1010 байтов

Объяснение:

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.