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

99 программу на паскале .заполните одномерный массив с датчика случайных чисел таким образом,чтобы все его элементы были различны(не используйте логарифмы и тд ,максимально простое оформление)

👇
Ответ:
P1wHeNS
P1wHeNS
02.05.2021
Const n=20;
var a:array[1..n] of integer;
b,i:integer;
mn:set of byte;
begin
Randomize;
a[1]:=random(100)+1;
mn:=[a[1]];
for i:=2 to n do 
 begin
 b:=random(100)+1;
 while b in mn do b:=random(100)+1;
 a[i]:=b;
 mn:=mn+[b];
 write(a[i]:3);
 end;
end.

Пример:
 48  4 91 38 69 71 75 50 46 73 33 10 60 98 42 77 83 15 76
4,4(93 оценок)
Ответ:
Danelpos
Danelpos
02.05.2021
Const n=20;
var a:array[1..n] of integer;b,i,j:integer; t:boolean;
begin
Randomize;
writeln;
for i:=1 to n do begin
t:=false;         
while t=false do begin         
a[i]:=random(100)+1;         
t:=true;                 
for j:=1 to i-1 do                 
if a[i]=a[j] then t:=false;
end;
write(a[i]:4);
end;
end.

  85 100  91  43  88  27   2  40  97  81  29  95  58  24  28  84   8  12  67   6
4,4(7 оценок)
Открыть все ответы
Ответ:
VolkovaI
VolkovaI
02.05.2021

#include <iostream> // header input/output streams

#include <fstream> // header для работы с файлами

using std::ifstream; // для работы с файлом input.txt

using std::ofstream; // для работы с файлом output.txt

using std::cin; // для работы cin

using std::cout; // для работы cout

using std::endl; // для работы перевода на новую строку endl

int main(){

ifstream in_file;  // input.txt

  ofstream out_file;  //output.txt

   try{

     in_file.open("input.txt");

     out_file.open("output.txt");

   }

  catch(std::exception& e){

     cout << e.what() << endl;

   }

  unsigned int a,b;

  in_file >> a >> b;

  unsigned int sum = a+b -1;

cout << sum;

  out_file << sum - a << ' ' << sum-b << endl;

}

4,7(83 оценок)
Ответ:
lizakirianova03
lizakirianova03
02.05.2021

#include <iostream> // header input/output streams

#include <fstream> // header для работы с файлами

using std::ifstream; // для работы с файлом input.txt

using std::ofstream; // для работы с файлом output.txt

using std::cin; // для работы cin

using std::cout; // для работы cout

using std::endl; // для работы перевода на новую строку endl

int main(){

ifstream in_file;

  ofstream out_file;

   try{

     in_file.open("input.txt");

     out_file.open("output.txt");

   }

  catch(std::exception& e){

     cout << e.what() << endl;

   }

  unsigned int a,b;

  in_file >> a >> b;

  unsigned int sum = a+b -1;

cout << sum;

  out_file << sum - a << ' ' << sum-b << endl;

}

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