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

Цифры натурального числа поместить в массив в том же порядке, в каком они записаны в числа. ( турбо паскаль)

👇
Ответ:
pollywhite1
pollywhite1
19.03.2023
Var j,n,i:longint;     
     a,b:array [1..1000] of integer;
begin         
         readln(n);// считываем число         
         i:=1;// начинаем с первого элемента массива
         while (n>0) do //пока n больше нуля
         begin
                a[i]:=n mod 10;  //тем самым выбираем последнюю цифру числа
                n:=n div 10; // откидываем последнюю цифру
                i:=i+1;// следующий элемент массива
         end;
                // по окончании в массиве a будет храниться наше число только
               // в обратном порядке
         i:=i-1;// теперь i равно длине числа +1 поэтому отнимаем 1
         for j:=i downto 1 do // с конца массива а до 1
         begin
                b[i-j+1]:=a[j]; // заполняем b в обратном порядке
         end;
         //теперь в массиве b хранится наше число в нужном порядке
         for j:=1 to i do
         begin
                       write(b[j],' ');
         end;
end.
4,8(5 оценок)
Открыть все ответы
Ответ:
dimatuz2018
dimatuz2018
19.03.2023

я бы хотел съездить в город бийск, потому что там красиво, особенно в алтайских горах. горы почти достают до неба. внизу они зеленые от растущего вокруг леса. выше — светлые, а верхушки — совсем бело-голубые. я бы хотел побывать на священном ручье, который несет чистую ледяную воду с гор в реку катунь. недалеко от ручья есть дерево желаний. каждый может подойти к нему, загадать желание и привязать к его ветвям ленточку. и красуется это дерево, как разноцветная ёлка. еще я бы хотел побывать на том месте, где сливаются реки бия и катунь, образуя реку обь. и с приятными воспоминаниями и впечатлениями вернуться домой.

 

ich möchtein die stadtgehen, weil esbijskist sehr schön,vor allem in deraltai-gebirge.diebergehat fastbis zumhimmel.an der unterseitesind siegrünauswachsen rund umden wald.above -licht, und dietop -nur dieblau und weiß.ich möchteden heiligenbach, derein reinesgletscherwasseraus den bergendes flusseskatunist, zu besuchen.in der nähe desbachesgibt es einen baumwünsche.jeder kannkommenund sich etwas wünschenund binden sie esan die zweigedes bandes.undschmückten denbaum alsbunten baum.ich möchte auchan die stelle, wo die flüssekatunundbiya,bildenden flussobbesuchen.undmit angenehmenerinnerungen und erfahrungenwieder nach hause.

4,4(68 оценок)
Ответ:
зака16
зака16
19.03.2023

#include <iostream>

using namespace std;

int min(int v, int w){

   if (v > w){

       return w;

   }else{

       return v;

   }}

int minimum(int a, int b, int c){

   int min1, min2;

   min1 = min(a,b);

   min2 = min(min1,c);

   return min2;

}

int max(int v, int w){

   if (v > w){

       return v;

   }else{

       return w;

   }}

int maximum(int a, int b, int c){

   int max1, max2;

   max1 = max(a,b);

   max2 = max(max1,c);

   return max2;

}

int main() {

int a, b , c , d,min3,max3,e;

cin >> a >> b >> c;

min3 = minimum( a, b, c);

max3 = maximum( a, b, c);

e =  (max3 - min3 )/2;

d = (a + b + c)/3;

cout << d + e;

}

Объяснение:

решение на с++

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