Var a:double; Begin write('Введите число: '); read(a); if a > 0 then write('Число положительное') else if a < 0 then write('Число отрицательное') else write('Введен 0, он нейтральный'); End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку