Дан массив из N элементов(12 элементов), заданный случайным образом от -10 до 10. Вывести на экран этот массив. С клавиатуры вводятся два числа меньше N. Вывести на экран часть массива входящих в диапазон, двух введенных чисел....
Дан массив из N элементов(12 элементов), заданный случайным образом от -10 до 10. Вывести на экран этот массив. С клавиатуры вводятся два числа меньше N. Вывести на экран часть массива входящих в диапазон, двух введенных чисел. Эти два числа будут индексами к тем числам, которые надо вывести.
Гость
Ответ(ы) на вопрос:
Гостьconst n = 12;
var a:array [1..n] of integer;
i,c,b:integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(21)-10;
write (a[i],' ');
end;
writeln;
repeat
write ('C = ');
readln (c);
until c in [1..n];
repeat
write ('B = ');
readln (b);
until b in [1..n];
if c
Не нашли ответ?
Похожие вопросы