Предмет: Информатика, автор: schlaff

Составить программу Pascal: заданы числа a и b. Определить, эти числа одного или разных знаков

Ответы

Автор ответа: Аноним

// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
var a,b:real;
Write('Введите два числа через пробел: ');
Read(a,b);
if a*b>0 then Writeln('Числа одного знака')
else Writeln('Числа разных знаков')
end.

Автор ответа: Аноним

Тогда открывайте вопрос заново и пишите там, что нужна программа под Turbo Pascal 7.01

Автор ответа: schlaff

Скажите, как исправить её?

Автор ответа: Аноним

Правила запрещают исправлять вопрос, если на него дан ответ

Автор ответа: schlaff

Да не вопрос, а программу, может быть получиться.

Автор ответа: schlaff

А вопрос я создал новый

Предыдущий вопрос

Следующий вопрос