1. Информатика
  2. Ввести 2 числа. если их произведение

Ввести 2 числа. если их произведение отрицательно, умножить его на 8 и вывести на экране, в противном случае увеличить его в 1,5 раза и вывести на экран. (написать программу, начертить блок-схему).

катяипапа000111 катяипапа000111    1   23.09.2019 09:10    40

Ответы
polina1354 polina1354  10.08.2020 23:56
Program qwerty;
var a,b:integer; c:real;
begin
read (a,b);
c:=a*b;
if c<0 then c:=c*8
else c:=c*1.5;
write (c);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
annvggf annvggf  06.09.2019 19:10
Хранит большие объемы информации,служит для переноса ее на другие компьютеры...
Кристина20060805 Кристина20060805  06.09.2019 19:10
Внекотором каталоге хранился файл газета. имевший полное имя с: /сентябрь1/газета. пользователь находившейся в этом каталоге поднялся на один уровень в верх, создал подкаталог...
aidosashimbek200 aidosashimbek200  06.09.2019 17:40
Определи вид информации по форме представления. установи соответствие с видом информации. фотография —...
kolitka1 kolitka1  01.05.2019 19:04
Ть дуже.прям дуже ! 50 і 3 фермер .потрібно зробити табличку в exel.інформатика.продовження: закупити за 69 грн за один кущ в інтернет магазині із розрахунком 50000 кущів...
romaberduk03 romaberduk03  01.12.2020 20:39
Коля, Вася и Сережа рисовали плакат. Нечаянно один из мальчиков пролил краску и испачкал пол. На вопрос учителя, кто разлил краску, они дали такие ответы: Сережа: Это...
elnur22 elnur22  01.12.2020 20:39
Очень над ! 1. Яким є порядок розв язування задач, у яких передбачено опрацювання деякої сукупності даних? 2. Як зміни елементів масиву мовою програмування Free Pascal,...
ltandreeva2016 ltandreeva2016  01.12.2020 20:39
Заполнить список 15 случайными целыми числами из [-20; 20]. Найти среднее арифметическое чисел этого списка, кратных 3. Имена переменных: x, y, z. Написать программу.p.s....
мальчуган2 мальчуган2  01.12.2020 20:39
При копировании формулы из ячейки D2 в ячейку B1 в последнюю была занесена формула =A2-2 Что было записано в ячейке D2​...
ксения1376 ксения1376  01.12.2020 20:40
Трое друзей, футбольных болельщиков, спорили о результатах предстоящего турнира. Мнение Юрия: Вот увидите, Барселона не станет первой. Зенит будет первым .Мнение Виктора:...
Nolly567 Nolly567  01.12.2020 20:40
Здравствуйте информатика 7 класс задания подробна записать с ответом​...

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