Напишите программу в паскале авс, опеделяющую знак числа

Litel1 Litel1    3   17.07.2019 22:20    0

Ответы
Brakorenko88 Brakorenko88  03.10.2020 06:40
Var a:integer;
Begin
read(a);
if a>0 then write('Число положительное');
if a<0 then write('Число отрицательное');
if a=0 then write('Введённое число - 0');
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика