Предмет: Информатика,
автор: amboss
ДАЮ 100 БАЛЛОВ! ИНФОРМАТИКА! ОЧЕНЬ СРОЧНО НУЖНА ПОМОЩЬ!
Заданы числа а и b. Написать программу, которая определит, эти числа одного или разных знаков (положительные/отрицательные)
Задание нужно решить в программе Паскаль!!!
Ответы
Автор ответа:
0
Ответ:
begin
var a:= ReadInteger;
var b:= ReadInteger;
begin
if a=0 then
Println ('Число а равен нулю');
if b=0 then
Println ('Число b равен нулю');
end;
begin
if a>0 then
Println ('Число а положительное');
if a<0 then
Println('Число а отрицательное');
end;
begin
if b>0 then
Println ('Число b положительное');
if b<0 then
Println('Число b отрицательное')
end;
end.
amboss:
у меня не получилось...
Похожие вопросы
Предмет: Английский язык,
автор: madina184
Предмет: Русский язык,
автор: викторияпоолл
Предмет: Русский язык,
автор: ДанилWEDF
Предмет: Химия,
автор: vedernikovsemyon
Предмет: История,
автор: RiLFoX