Вопрос по информатике:
Программа для Pascal ABC
С клавиатуры вводится 2 числа, если они оба четные, то найти их разность, иначе вычислить сумму модулей
- 05.12.2017 03:14
- Информатика
- remove_red_eye 2547
- thumb_up 30
Ответы и объяснения 1
Var one, two, res: integer;
begin
write('Введите первое и второе число: ');
read(one, two);
if (one mod 2 = 0) and (two mod 2 = 0) then
res:=one-two
else
res:=abs(one)+abs(two);
writeln(res)
end.
- 07.12.2017 00:03
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.