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

Из шестизначного числа выделить цифры и из них сформировать одномерный массив. pascal

👇
Ответ:
masha28122812
masha28122812
02.03.2020
Var a:longint;
b: array[1..6] of integer;
i:integer;
begin
    readln(a);
    for i:=6 downto 1 do
       begin
          b[i]:=a mod 10;
          a:=a div 10;
       end;

      {вывод массива}
        for i:=1 to 6 do
            writeln(b[i]);
end.
4,8(62 оценок)
Открыть все ответы
Ответ:
driftstiwrx
driftstiwrx
02.03.2020
import java.lang.*;
import java.util.*;
import java.math.*;

class {
public static void main(String[] args){
int m, n;
Scanner sc = new Scanner(System.in);

System.out.print("Enter m: "); m = sc.nextInt();
System.out.print("Enter n: "); n = sc.nextInt();

int A[][] = new int[m][n];

for(int i = 0; i < m; i++){
for(int j = 0; j < n; j++){
float random = (float) Math.random();
random *= -100;
int rand = (int) Math.ceil(random) + 200;;

if((i + j) == rand){
System.out.println("A: " + i + " " + j);
};
};
};
};
}
4,5(17 оценок)
Ответ:
lyudagrigoreva2
lyudagrigoreva2
02.03.2020
#include <iostream>
#include <cmath>
using namespace std;
bool prost(int m){
int k = 0;
for (int i=2; i<=sqrt(m); i++)
if (m % i == 0) k++;
return k==0;
}

int main(){
    int n, r;
    int i = 1;
    cout << "n = ", cin >> n, cout << "\n";
    if (prost(n)) {
    cout << "1 * " << n << " = " << n << "\n";}
    else {
    r = n;
    while (r != 1){
    i++;
    if (prost(i)){
    while (r % i == 0){
    r = r / i;
    cout << i;
    if (r != 1) cout << "*";
    }
  }
  }
  cout << "=" << n << "\n";
    }
return 0;
}

Пример:
n = 2720
2*2*2*2*2*5*17=2720
4,5(43 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ