М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Olya199701
Olya199701
24.07.2020 04:42 •  Информатика

Пользователь вводит трехзначное число, программа выводит новое число, состоящее из цифр старого числа, расположенных по возрастанию. Например 453, вывод 345. Программа КуМир.

👇
Ответ:
ibarabol318
ibarabol318
24.07.2020

Должно работать, на всякий случай проверьте

Вариант 1

алг

нач

цел n, a, b, c

ввод n

a:= mod (n, 10)

b:= div(mod(n, 100), 10)

c:= div (n, 100)

если b<a

то n:=b

b:=a

a:=n

все

если c<b

то n:=c

c:=b

b:=n

все

если b<a

то n:=b

b:=a

a:=n

все

вывод a, b, c

кон

Вариант 2:

алг

нач

цел n, a, b, c

ввод n

a:= mod (n, 10)

b:= div(mod(n, 100), 10)

c:= div (n, 100)

вывод int(min(a,min(b, c))), int(a+b+c-min(a, min(b, c))-max(a, max(b, c))), int(max(a,max(b, c)))

кон

4,7(95 оценок)
Открыть все ответы
Ответ:
artumko04
artumko04
24.07.2020

1) полная таблица истинности каждого выражения с пятью переменными содержит 2^5 = 32 строки;

2) в каждой таблице содержится по 4 единицы и по 28 нулей, ( то есть 32-4);

3) выражение a v - b равно нулю тогда, когда a = 0 или b = 1;

4) min количество единиц в таблице истинности выражения a v - b будет тогда, когда там будет наибольшее число нулей, то есть в max количество строк одновременно a = 0 и b = 1;

5) по условию a = 0 в 28 строках, и b = 1 в 4 строках, поэтому выражение a v - b может быть равно нулю не более чем в 4 строках, а оставшиеся 32 – 4 = 28 могут быть равны 1.

ответ: 28.

4,5(30 оценок)
Ответ:
JHope23
JHope23
24.07.2020

1)program p1;

var m,n: integer;

begin

write('вводите число: '); readln(n);

if n> =100 then

begin

m: = n mod 10;

writeln('последняя цира: ',m);

m: =n div 10 mod 10;

writeln('предпоследняя цира: ',m);

end;

end.

2)program p2;

var t1,t2,t3,d1,d2,d3,v1,v2,v3: integer;

vsr: real;

begin

write('вводите время езды(ч): '); readln(t1,t2,t3);

write('вводите скорость(км/ч): '); readln(v1,v2,v3);

d1: =v1*t1;

d2: =v2*t2;

d3: =v3*t3;

vsr: =(d1+d2+d3)/(t1+t2+t3);

writeln('средяя скорость= ',vsr: 1: 2,'км/ч');

end.

4,6(89 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ