Информатика, опубликовано 2018-08-22 20:51:31 by Гость
Ввести 2 числа. Если их произведение отрицательно и четно, умножить его на –2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран. (в паскале)
Ответ оставил Гость
Полагаю, что так:
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 write(z*-2)
else
write(z*1.5);
END.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.