Ответ:
program Multi;
var
a, b: Real;
begin
Write ('Введите 2 числа: ');
ReadLn (a, b);
if a * b > 0 then
WriteLn ('Произведение положительно')
else if a * b < 0 then
WriteLn ('Произведение отрицательно')
else
WriteLn ('Произведение равно 0');
ReadLn;
end.
Форма представления информации.
• текстовую (совокупность алфавитных, цифровых и специальных символов, с помощью которых информация отображается на бумажном носителе или экране монитора);
• графическую (графики, диаграммы, схемы и рисунки);
• звуковую (звуковые сигналы и радиоволны, применяемые в радиовещании, телефонии);
• видеоинформацию (световые сигналы, воспринимаемые зрением);
• мультимедиаинформацию (текстовая, графическая, звуковая и видеоинформация, представляемая с помощью компьютерных средств).