сервис вопросов и ответовДанн одномерный массив из N элементов заполнить его случайными числами от -20 до 25 все положительными элементами заменить на 1. все отрецательные на
5-9 класс|
|
0
Alenakoryagina1
12 мая 2014 г., 10:36:35 (9 лет назад)
Draga11
12 мая 2014 г., 11:25:09 (9 лет назад)
Program Task;
Const N = 10;
Var a: Array [1..N] of Integer;
i: Integer;
Begin
Randomize;
For i := 1 To N Do
a[i] := Random(25 + 20 + 1) - 20;
WriteLn('Результат №1: ');
For i := 1 To N Do
Write(a[i], ' ');
WriteLn;
For i := 1 To N Do
If a[i] > 0 Then
a[i] := 1
Else If
a[i] < 0 Then
a[i] := 0;
WriteLn('Результат №2:');
For i := 1 To N Do
Write(a[i], ' ');
ReadLn;
End.
Ответить
Другие вопросы из категории
A 3 Между населёнными пунктами А, В, С, D, Е построены
дороги, протяжённость которых (в километрах) приведена в таблице:
Помогите!!!! Очень нужно!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!что такое знаковая система? попытайтесь описать русский язык как знаковую систему . опишите
десятичную систему счисления как знаковую систему
Читайте также
1.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами до 50. Найти сумму всех четных элементов массива и их количество.
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
ССССРРРРРРРРРРРРРРЛОООООООООООЧЧЧЧЧЧЧЧНООООООООО!!! 1. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
решить через паскаль через массивы)) 1.Дан одномерный массив из 10 элементов. Заменить все большие 7 члены массива числом 7. Найти количество
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.
1) Дан одномерный массив из 12 элементов. Составить программу заполняющую массив целыми числами в интервале -20 до 15 2)Требуется
подсчитать кол-во пятерок , четверок, тоек полученных за контрольную работу, если число учеников равно 8
3)Дан одномерный числовой массив,изменить знак элементов массива К[1;12] на противоположный
Вы находитесь на странице вопроса "Данн одномерный массив из N элементов заполнить его случайными числами от -20 до 25 все положительными элементами заменить на 1. все отрецательные на", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.