Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
жак77777
07.02.2022 11:22 •
Информатика
Составьте программу на языке Pascal для решения задачи. С клавиатуры вводятся два числа. Если их произведение отрицательно, необходимо умножить его на 8, в противном случае увеличить его в 1,5 раза. Результат вывести на экран
Ответ:
Misha01923
13.08.2020 12:21
PascalABC.NETbeginvar p := ReadReal*ReadReal; p *= p<0 ? 8 : 1.5; p.Printend.
Пример работы:
0,0
(0 оценок)
Популярные вопросы: Информатика
поорд
25.01.2021 19:50
Дана последовательность из n (1≤n≤105) чисел ai (1≤ai≤1012) и q запросов (1≤q≤105). Каждый запрос предстает собой число pi (1≤pi≤1012). Задача состоит в том, чтобы на каждый...
thefizrap0c5s5
24.07.2021 22:17
Для долговременного хранения данных можно Использовать: Овнутренню память о магнитные диски оустройства ввода Оцентральный процессор...
ViktoriaTigra
24.11.2021 03:56
- Что такое регистр процессора? 1. Это компонент процессора для хранения данных во 2-й системе. 2. ответа нет 3. Это компонент процессора для хранения данных в 10-й системе...
Brolik
06.09.2020 23:52
1. Производится одноканальная (моно) звукозапись с частотой дискретизации 48 кГц и глубиной кодирования 16 бит. Запись длится 2 минуты, ее результаты записываются в файл,...
Snake505
27.11.2020 13:54
Заполните пропуски в тексте.Оглавление – это . Оглавление позволяет читающему легко в предоставленном ему документе. Для добавления оглавления используется команда , находящаяся...
НикаЛисовская
12.01.2021 16:57
Для чего нужен человеку комьютер...
QWERTY12345P
30.07.2021 09:10
Проверьте паскаль, где не понимаю, как сумму сделать var a: array [1..6] of integer; i: integer; sum: integer; begin sum: =0; for i: =1 to 6 do begin readln(a[ i ]); sum:...
Jamilya28
18.01.2023 16:44
ответ на решение уравнению 5*4*27*3*2=13 надо вставить знаки плюс.минус.умножить.или разделить...
ikilan201
18.01.2023 16:44
Какое наименьшее пятизначное число делится на 97? а)10086 б)10088 в)10090 г)10092...
alinalera71
18.01.2023 16:44
Написать на языке мой завтришний день 5-7 предложений...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Пример работы: