Регистрация
lika771
19.01.2023 00:05
Информатика
Есть ответ 👍

Программа для pascal abc с клавиатуры вводится 2 числа, если они оба четные, то найти их разность, иначе вычислить сумму модулей

213
284
Посмотреть ответы 2

Ответы на вопрос:

nurasylmahambet
nurasylmahambet
4,7(40 оценок)
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.
Оксана1241
Оксана1241
4,5(62 оценок)

Инструменты Краска-кисти. Инструменты Формы- формы. Инструменты Текст- текс. Инструменты штамп- штамп

Объяснение:

проверено в билимленд

Популярно: Информатика