Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
irishkaevdokimova14
10.09.2022 21:59 •
Информатика
Ввести 2 числа. Если их произведение отрицательно,
умножить оба на 2 и вывести на экран, в противном случае увеличить
оба в 3 раза и вывести на экран.
Ответ:
nshxhdnjdbook
14.10.2020 06:12
PascalABC.NET 3.7:
### var a := RAI(2); var p := a.Product;a.Tr(x → p<0 ? x*2 : x*3).Pr
0,0
(0 оценок)
Популярные вопросы: Информатика
topovyyanTay
05.03.2021 22:49
Для кодирования букв а, б, в, г решили использовать двухразрядные последовательные двоичные числа (от 00 до 11, соответственно). если таким закодировать последовательность...
Kristina2005fomina
14.03.2022 16:25
Написать программу (на pascalabc.net) файл содержащий сведения о книгах.сведения о каждой из книг это фамилия автора,название и год издания. программа обращается к модулю...
Agarin
08.04.2022 07:28
Введите число, если оно не отрицательное, то найдите каадратный корень, иначе вычислите обратное число....
кейсикупер1
16.01.2022 13:38
Паскаль массив b[30] целых элементов задать датчиком случайных чисел. переписать подряд в массив а те элементы массива в, для которых справедливо: bi (bi-1+bi+1)/2 program...
zwezdael
05.06.2022 09:22
7: фильтрация данных. поисковые запросыв базе данных магазина хранятся записи о различных моделях ноутбуков. среди параметров есть, в частности, параметр «производитель...
тимур624
07.07.2022 13:03
Напишите продолжение. все программы-важный пункт-...
anastasialishcnastya
07.07.2022 13:03
Можно ли следующие объекты считать информационными моделями 1) расписание уроков 2) програсма телевидения 3) рецепт на получение...
King20051
28.04.2022 23:23
Решить систему неравенств: 5x+13 =0решить систему неравенств: 5x+13 =0 x+5 =1...
lazyseal1488
28.04.2022 23:23
Смешно, не правда ли смешно: когда секунд не достает, недостающее звено и недолет, и недолет. найти безличный глагол...
yanemykina2014
28.04.2022 23:23
Два сына хотели переправиться к папе на другой берег,но их плот выдерживает только 2 человек, как перправиться на другой берег?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
PascalABC.NET 3.7:
### var a := RAI(2); var p := a.Product;a.Tr(x → p<0 ? x*2 : x*3).Pr