Дан массив из N элементов(12 элементов), заданный случайным образом от -10 до 10. Вывести на экран этот массив. С клавиатуры вводятся два числа меньше N.
5-9 класс
|
Вывести на экран часть массива входящих в диапазон, двух введенных чисел. Эти два числа будут индексами к тем числам, которые надо вывести.
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<b then
for i:=c to b do write (a[i],' ')
else for i:=b to c do write (a[i],' ');
readln;
end.
Другие вопросы из категории
получили за контрольную работу, то учитель сказал: «Попробуйте догадаться
сами, а я вам скажу, что в классе двоек нет и у вас троих три разные отметки,
причём у Аллы - не «3», у Люды - не «3» и не «5». Напиши, какую отметку
получила каждая из трёх учениц?
участка:a1,b1,c1,a2,b2,c2.составте программу определяющую равны ли площади этих земельных участков.если участки имеют разные площади то определите у какого фермераучасток больше.PascalABC.
2.Задача. Составьте программу нахождения наибольшего значения роста у двух членов школьной баскетбольной команды (Рост спортсменов вводится с клавиатуры)
Читайте также
2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.
Вывести на экран часть массива входящих в диапазон, двух введенных чисел. Эти два числа будут индексами к тем числам, которые надо вывести.
равен 500; второй равен целой части квадратного корня из предыдущего элемента; третий равен целой части от деления текущего индекса на три части (если она равна нулю,то соответствующий элемент массива делать равным 1)
увеличит на 10.Преобразованный массив вывести на экран в строчку через запятую
Пример вывода ответа: 5*2 = 10
6*2 = 12 и т.д.
2) Напишите программу перевода расстояния из метром в сантиметры для значений длин от 1 до 15 метров.
(Информатика. 8 класс. Паскаль)