1. Информатика
  2. Составьте программу на языке Pascal

Составьте программу на языке Pascal для решения задачи. С клавиатуры вводятся два числа. Если их произведение отрицательно, необходимо умножить его на 8, в противном случае увеличить его в 1,5 раза. Результат вывести на экран

Qwtyt Qwtyt    2   21.06.2020 16:28    1

Ответы
vinks2905 vinks2905  13.08.2020 12:21
PascalABC.NETbeginvar p := ReadReal*ReadReal; p *= p<0 ? 8 : 1.5; p.Printend.

Пример работы:


Составьте программу на языке Pascal для решения задачи. С клавиатуры вводятся два числа. Если их про
Составьте программу на языке Pascal для решения задачи. С клавиатуры вводятся два числа. Если их про
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
leyla210 leyla210  13.09.2019 02:10
Вычисли число строк в таблице, не считая шапки таблицы. число переменных в выражении — 9....
gxgvxf gxgvxf  30.01.2022 19:01
Составьте ребус для одного из следующих слов: монитор, процессор, курсор, клавиатура, модель....
khakimail khakimail  30.01.2022 19:05
Два узла находятся в одной сети. IP1=211.115.61.154 IP2=211.115.59.37 Найти наибольшее возможное значение третьего слева байта маски, адрес сети, количество компьютеров...
насвай4 насвай4  20.08.2019 17:10
Составьте предложения по схемам на тему наши школьные дела только можно не из интернета? ). )....
Саша1111111211111 Саша1111111211111  20.08.2019 17:10
Линейный алгоритм приготовления блюда...
Den910 Den910  20.08.2019 17:10
4. дані координати вершин багатокутника (x1, y1,x2,y2,.x10,y10). напишіть програму для обчислення його периметра (обчислення відстані між вершинами оформити підпрограмою)....
Максим7891 Максим7891  20.08.2019 15:59
нужно создать двумерный массив а,внутри которого создать второй массив в,сумма элементов которого не больше 100 !...
beskrovnaja beskrovnaja  20.08.2019 17:10
Мне надо составить циклическую блок- схему с 2 циклами любой пример ( не уравнение)...
kartil kartil  20.08.2019 17:00
Найти все двузначные числа, сумма квадратов цифр которых кратна m....
Mitaren10n3 Mitaren10n3  20.08.2019 17:00
Вкладчик внёс в сбербанк вклад s какая сумма будет на счёту вкладчика через n лет? напечатайте таблицу зависимости s=f(n) для n = 1,2,3..20 s=1000 годовой приоритет 4%...

Популярные вопросы