Расположим по алфавиту десять слов, обозначающих цифры в десятичной системе счисления. возьмём четыре - id458288720210315 от Killkor3000 15.03.2021 23:21

Question

Информатика: Расположим по алфавиту десять слов, обозначающих цифры в десятичной системе счисления. возьмём четыре последние из них и из соответствующих цифр составим минимальное возможное трехзначное число, в котором цифры не повторяются. a) 102 б) 289 в) 123 г) 208

Killkor3000 · Accepted Answer

Так как в условии задачи речь идет о массиве действительных чисел,то будем использовать тип real. Четкого размера массива нет - используем динамический массив var  a: array of real; // динамический массив вещественных чисел  n, x, y, i: integer; begin  write( Vvedite razmer massiva n= );   readln(n); // считываем размер динамического массива  a := new real[n + 1]; // инициализируем динамический массив размера n  for i := 1 to n do        begin            a[i] := random(n, -n) + 1 / (random(n) +...

MOGZ ответил