tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Преобразовать одномерный
Преобразовать одномерный массив из 10 элементов, заменив все отрицательные числа на -1 , а положительные на +1
дэнчик626
3 29.09.2019 04:30
0
Ответы
akitaeva1
04.08.2020 19:14
PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018Внимание! Если программа не работает, обновите версию!
begin
var a := ArrRandom(10, -50, 50);
a.Println;
a.Transform(t -> Sign(t));
a.Println
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
KVERCXI
12.04.2019 17:27
Оценки по контрольной образуют массив. определить числа 5 и 2 и средний ( оценки выставлены от 2 до 5) . сделать в паскале....
Luuna0111
12.04.2019 17:39
Расположите по порядку оформления автооглавление1)ссылки - добавить текст, выбираем уровень оглавление - автособираемое оглавление выделяете тест, который необходимо...
saaxst
12.04.2019 17:39
Язык программирования си! проверить можно на онлайн компиляторах типа репл ит нужна только вторая лаборатория 5 состоит из двух частей: • программирование текстового...
makcim2504
12.04.2019 17:40
Язык программирования си! проверить можно на онлайн компиляторах типа репл ит нужна только вторая лаборатория 5 состоит из двух частей: • программирование текстового...
rege12345
12.04.2019 17:41
Язык программирования си! проверить можно на онлайн компиляторах типа репл ит нужна только вторая лаборатория 5 состоит из двух частей: • программирование текстового...
Ксюша99009
12.04.2019 17:54
Составьте программу в pascal: компьютер задаёт случайное двухзначное число х, например 39; компьютер задаёт случайное однозначное число у, например 8; необходимо получить...
damirgaraischi
12.04.2019 18:00
Размером 38,1×38,1 см. разрешающая сканера — 600×1200 dpi, глубина цвета — 8 бита. какой информационный объём будет иметь полученный графический файл?...
toshamilgis
12.04.2019 18:10
За какое наименьшее время принтер распечатать текстовый файл размером 800 кбайт, хранящийся на дискете,если он печатает со скоростью 4 стр./мин, на каждой странице 60...
teodor16090
12.04.2019 18:11
Склавиатуры вводится число. найти количество цифр этого числа, кратных числу, введенному с клавиатуры....
Redimer
12.04.2019 16:19
Написать на языке pascal: 1. возвести число в квадрат.2. даны три числа. найти среднее арифметическое трех чисел.3. найти значение выражения y=8*x(лучше чтобы это работало...
Популярные вопросы
Решить 21/20*100 , если мы ещё не проходили числа после запятой...
3
Из 21 кг хлопкового семени получили 5,1 кг масла. сколько масла получится...
2
Признак правонарушения а. убежденность суда в противоправности деяния...
2
Вращение земли вокруг своей оси также называю : а) круглогодичным...
1
Добрый вечер. а , , с переводом таких предложений: 1. when you stop...
3
Форма совместного проживания людей в каменном веке? , )...
3
Мы поставили гнездо на соседнюю березку. разобрать синтаксически...
3
36. my watch is broken – i need . a) to get it fixed b) to have fixed...
1
Вот 2 . краска в виде порошка расфасована пакетики по 15 г краски...
2
31. we’d better not any longer. a) wait b) to wait c) waiting 32....
1
begin
var a := ArrRandom(10, -50, 50);
a.Println;
a.Transform(t -> Sign(t));
a.Println
end.