tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу, которая формирует
Составить программу, которая формирует массив из 12 случайных чисел, принадлежащих промежутку от 0 до 50 и заменяет положительные числа на -5
AVlone
2 14.09.2019 04:00
1
Ответы
stalker1897ox9hzs
07.10.2020 13:21
Var
a:array [1..12] of integer;
b:integer;
Begin
for b:=1 to 12 do begin
a[b]:=random(51);
if a[b]<>0 then a[b]:=-5;
end;
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Yulchan23
14.06.2020 12:02
Информационные системы. Назначение, классификация,основное функции, пример информационных систем....
дима123163
14.06.2020 12:02
с вопросами 1. Какие операции можно производить над выделенным объектом? 2. Какие инструменты графического редактора CorelDraw Вы знаете? 3. Для чего предназначена Панель инструментов...
Tanyams
15.06.2019 03:30
Совокупность команд последовательность действий процессора с целью получения требуемого результата...
Maria123456789101
13.04.2020 09:52
В чём же отличие 2D и 3D моделирования? ...
lissasalvatore
13.04.2020 09:52
Дан код с номером. Определи, какой это символ: управляющий или изображаемый. Код с номером 18....
Elementrix534
25.11.2019 06:10
Создайте программу ввода и вывода массива 8, 4,8 6 1 15 5 4 -8 -7 -3 1 составьте программу вычисления в массиве в(12) суммы элементов больших -5...
FluffyFoxLove
25.11.2019 06:07
Составьте программу ввода и вывода массива 15 12 -3 6 7 9 -4 8 1 2 9 -3я сейчас на уроке сижу и сейчас контроша...
aminyshaa
25.11.2019 07:20
Хельп я тупов надо 20 стиволов вот и пишу ...
pravikvdushe
25.11.2019 07:11
Выберите профессию. например ,дизайнер или врач. какие прикладные программы используют эти специалисты. ответ обоснуйте...
Сын12ru
08.08.2019 00:10
Определить сколько моих любимых книг поместится на диске cd - 700mb...
Популярные вопросы
с математикой (геометрия) ...
1
Напишите не перевод а произношение песни ich glaub du bist hier falsch aha hast...
2
A^4+a^3+a+1 Представить в виде произведения...
1
Лабораторная работа по биологии.Тема: Изучение изменчивости у организмов.Оборудование:...
2
Переведите текст только не через переводчик ...
3
Маємо трикутник ABC. AC= 44,4 см ∠ B= 60° ∠ C= 45° Відповідь: AB= Нужен просто...
3
Укажите равенство , выражающее распределительный закон умножения: а) (a+b) ×c =...
3
Какие животные и растения есть в Аргентине не много;-)...
1
Диагонали ромба ABCD пересекаются в точке O. На стороне AB взята точка K _|_ AB....
1
Написать сочинение на английском языке на тему: мой любимый фильм Хатико или Холодное...
2
a:array [1..12] of integer;
b:integer;
Begin
for b:=1 to 12 do begin
a[b]:=random(51);
if a[b]<>0 then a[b]:=-5;
end;
End.