Вопрос по информатике:
Помогите с задачами
1) вводим число с клавиатуры если оно больше -5 или меньше 5 то вывести на экран "!!!!'' иначе "???''
2)вводим с клавиатуры два числа если их произведение больше 0 то выводим на экран их разность иначе сумму
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 21.01.2016 21:41
- Информатика
- remove_red_eye 15363
- thumb_up 33
Ответы и объяснения 1
A:real;
Begin
Write('Введите число: ');ReadLn(A);
if Abs(A)<5 then WriteLn('!!!')
else WriteLn('???');
End.
Var a,b:real;
Begin
Write('a = ');ReadLn(A);
Write('b = ');ReadLn(B);
if a*b > 0 then WriteLn('a - b = ',a-b)
else WriteLn('a + b = ',a+b)
End.
- 22.01.2016 19:29
- thumb_up 17
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.