Напишите программу которая в последовательности целых чисел выбранных случайном образом из диапазона от 15 до 69 определяет разность максимального и минимального чисел
Напишите программу которая в последовательности целых чисел выбранных случайном образом из диапазона от 15 до 69 определяет разность максимального и минимального чисел
Гость
Ответ(ы) на вопрос:
ГостьПрограмма без массива:
const n=10;
var a,i,max,min:integer;
begin
Randomize;
min:=69; max:=15;
for i:=1 to n do
begin
a:=random(55)+15;
write(a,' ');
if a>max then max:=a;
if amax then max:=a[i];
if a[i]