Ввести с клавиатуры 2 числа m,n>0. Если n<=m то вывести 1, иначе любое другое число. При выполнении задания нельзя использовать условные операторы, необходимо оставаться в классе целых типов и использовать операции целочисленной арифметики: div, mod, *, +, -. Записать фрагмент программы на Pascal. (делающим можно не писать, просто объясните, что мне надо накатать в тетради тогда) Работа на ABC Pascal

Ответы:
Богдан Шевченко
26-02-2014 04:59

while n <= m do n := 1;while n > m do n := 0;write(n);Если n <= m, то n = 1,если n > m, то n = 0 (любое число)При этом условные операторы использованы не будут.Есть вариант попроще: write(ord(n <= m))Если n <= m, то будет выведено 1 (порядковый номер true), иначе будет выведено 0 (порядковый номер false)

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Ввести с клавиатуры 2 числа m,n>0. Если n<=m то вывести 1, иначе любое другое число. При выполнении задания нельзя использовать условные операторы, необходимо оставаться в классе целых типов и использовать операции целочисленной арифметики: div, mod, *, +, -. Записать фрагмент программы на Pascal. (делающим можно не писать, просто объясните, что мне надо накатать в тетради тогда) Работа на ABC Pascal» от пользователя Алена Степанова в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!