Предмет: Информатика,
автор: dimon420
Паскаль!!!!!! Вводятся Х и Y. Если хотя бы одно из этих чисел положительно, то
найти их произведение. Иначе – найти их сумму. И желательно блок схему
Ответы
Автор ответа:
0
x, y: integer;
begin
readln(x, y);
if (x > 0) or (y > 0)
then
writeln(x * y)
else
writeln(x + y);
end.
С рисованием туго тут уж сам.
begin
readln(x, y);
if (x > 0) or (y > 0)
then
writeln(x * y)
else
writeln(x + y);
end.
С рисованием туго тут уж сам.
Интересные вопросы
Предмет: Право,
автор: yraslav1111
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: gulajymdalieva
Предмет: Математика,
автор: ganna19787878