zimogo121
26.01.2023 03:38

Перевести с Паскаля в c++ const discount=2;
var n, count, d, I, q: longint;
diva array [1..divcount]of longint;
begin
for n:=174457 to 174505 do begin
count:=0;
q:=floor(sort(n));
for d:=2 to q
if n mod d=0 then begin
count:=count+2;
if count<= divcount then begin
diva [count-1]:=d;
if d<>n divd then
divs[count]:=n divd;
and else break end;
if count=divcount
then begin
for I:=1 to divcount do
write(divs[i], ' ') ;
writeln;
end;
end;
end;

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
привет8917
14.04.2021 07:39
#include "math.h"#include "iostream"
using namespace std;
int main(){int a, n, max, min;int max_i, max_k, min_i, min_k;//ввод размера массиваcin>>a;cin>>n;
//объявление массиваint** a = new int* [a]; for(int i = 0; i < n; i++) { a[i] = new int [a]; }
//ввод первого массива for(int i = 0; i < a; i++) { for(int k = 0; k < n; k++) { cin>>a[i][k]; } } //Инициализация max, min; max=a[0][0]; min=a[0][0]; //поиск максимума for(int i = 0; i < a; i++) { for(int k = 0; k < n; k++) { if(max<a[i][k]) { max=a[i][k]; max_i=i; max_k=k; } } } //поиск минимума for(int i = 0; i < a; i++) { for(int k = 0; k < n; k++) { if(min>a[i][k]) { min=a[i][k]; min_i=i; min_k=k; } } }
//Max and Min меняются местамиswap(a[max_i][max_k],a[min_i][min_k]);getch();return 0;}
0,0(0 оценок)
Ответ:
Gbr330
26.11.2020 18:01
По выполняемым функциям и возможности применения информационные технологии делят на используемые:1) в автономных компьютерах (ПЭВМ) и в локальных рабочих станциях (АРМ) в составе сетевых автоматизированных информационных систем (АИС) реального времени;2) в объектно-ориентированных, распределённых, корпоративных и иных локальных и сетевых информационно-поисковых, гипертекстовых и мультимедийных системах;3) в системах с искусственным интеллектом;4) в интегрированных АИС;5) в геоинформационных, глобальных и других системах.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота