Регистрация
двоишник55
25.01.2022 04:35
Информатика
Есть ответ 👍

Синформатикой,ту массивы на языке паскаль. задайте массив из 10 элементов с датчика случайных чисел.замените нулем элементы массива,которые больше введенного с клавиатуры числа n.выведите на экран исходный и полученный массивы

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

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

Nottyt
Nottyt
4,4(98 оценок)
Var a,n: integer; m: array [1..10] of integer; begin readln(n); for a: =1 to 10 do begin m[a]: =random(50); writeln (m[a]); end; writeln ('новый массив'); for a: =1 to 10 do begin if m[a]> n then m[a]: =0; writeln (m[a]); end; end.
modar55
modar55
4,8(38 оценок)
1.объём информации - это количество информации во всё тексте. 2. 1.использования на различных устройствах. 2.вмонтирование в определенное устройство.

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