Const n = 10; var arr: array[1..n] of integer; i, j, k: integer; begin randomize; for i: =1 to n do begin arr[i] : = random(256); write (arr[i]: 4); end; writeln; for i: =1 to n-1 do for j: =1 to n-i do if arr[j] > arr[j+1] then begin k : = arr[j]; arr[j] : = arr[j+1]; arr[j+1] : = k end; for i: =1 to n do write (arr[i]: 4); writeln; end. вот .отсортировать в двумерном массиве целых случайных чисел только четные строки. использовать метод пузырьковой сортировки. исправьте
Ответы на вопрос:
var
a: 1000..9999; //четырехзначное число
a1, a2, a3, a4: 1..9; {цифры четырехзначного числа (цифры могут быть только от 1 до 9 в десятичной системе счисления)}
begin
writeln('введите четырехзначное число');
readln(a); //вводим четырехзначное число
a1: = a div 1000; {находим первую цифру, для этого делим это число без остатка на 1000 (например пусть число будет 5479, тогда получится 5479 / 1000 = 5,479; отбрасываем остаток и получается 5)}
a2: = (a mod 1000) div 100; {находим вторую цифру, для этого сначала берем остаток от деления этого числа на 1000, а потом делим результат на 100 без остатка (5479 / 1000 = 5,479; оставляем остаток, получается 479; 479 / 100 = 4,79 ; отбрасываем остаток и получается 4)}
a3: = (a mod 100) div 10; {находим 3 цифру, для этого сначала берем остаток от деления этого числа на 100, а потом делим результат на 10 без остатка (5479 / 100 = 54,79; берем остаток и получается 79; 79 / 10 = 7,9 ; отбрасываем остаток и получается 7)}
a4: = a mod 10; {для нахождения 4 цифры берем остаток от деления этого числа на 10 (5479 / 10 = 547,9 ; берем остаток и получается 9)}
writeln('сумма цифр числа ', a, ' равна: ', a1 + a2 + a3 + a4); {выводим сумму цифр}
end.
если все правильно, отметь решение как лучшее)
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Фейз30.06.2022 09:08
-
Kaspiyskaya9510.06.2023 05:56
-
alena67916.12.2022 02:55
-
Duhan112.01.2020 03:26
-
bon110129.06.2020 23:27
-
54женек423.07.2022 16:16
-
НастюшКа5047103.07.2021 20:12
-
09871425.03.2023 18:53
-
алгебра17122.05.2022 12:30
-
аоаоаоаоатте21.09.2020 02:53
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.