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

Ввести 2 числа. Если их произведение отрицательно и четно, умножить его на –2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран. (в паскале)
- Предмет:
  Информатика
- Автор:
  wiz
- 5 лет назад

Ответы 1

Полагаю, что так:program num;uses crt;var x,y,z: integer;BEGIN write('Enter the first number: '); readln(x); write('Enter the second number: '); readln(y); z:=x*y; if (z<0) AND ((z mod 2) = 0) then write(z*-2) else write(z*1.5);END.
- Автор:
  diggerlowe
- 5 лет назад
- 0
Добавить свой ответ

Еще вопросы

какие числа,кратные 2, удовлетворяют неравенству:
а)12<x<16? Это числа:_____________________________
б)5<a<29? Это числа:_________________________________
в) 64<y<72? Это числа:____________________________________

После двоеточий напиши слова плиииз:)
- Предмет:
  Математика
- Автор:
  bizzy
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Плиз помогите решить((((!!!!! На завтра надо((

Через известковую воду пропустили смесь угарного и углекислого газов объемом 2 л. Выпавший при этом осадок отфильтровали, высушили и прокалили. Масса твердого остатка после прокаливания 1,372 г. Определите объемные доли газов в исходной смеси((
- Предмет:
  Химия
- Автор:
  annabelwalls
- 5 лет назад
- Ответов:
  
  1
- Смотреть
продовжити діалог до вправи 42 укр. мова 4 клас. продовжити діалог до вправи 42 укр. мова 4 клас.
- Предмет:
  Українська мова
- Автор:
  dante68
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Упростить.
2y-(9y-(5y-h))
- Предмет:
  Алгебра
- Автор:
  hot pepper
- 5 лет назад
- Ответов:
  
  1
- Смотреть

How much to ban the user?

1 hour 1 day 100 years