Описать массив из 20 элементов вывести его на экран(случайно) отдельной строкой вывести 5-й элемент
Описать массив из 20 элементов вывести его на экран(случайно) отдельной строкой вывести 5-й элемент
Гость
Ответ(ы) на вопрос:
ГостьProgram n1;
var a: array[1..20] of integer;
i,k: integer;
begin
randomize;
for i:=1 to 20 do a[i]:=random(15);
for i:=1 to 4 do write(a[i],' ');
for i:=6 to 20 do write(a[i],' ');
writeln;
writeln(a[5]);
end.
Гость// PascalABC.NET 3.2, сборка 1385 от 14.02.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(20,-50,50); a.Println;
Writeln('a[5]=',a[4])
end.
Пример
-11 16 -26 -2 23 0 13 34 49 50 -40 20 -50 18 24 -5 -42 38 27 -23
a[5]=23
Если пятый элемент в первой строке надо при выводе пропустить, то так:
begin
var a:=ArrRandom(20,-50,50); (a[:4]+a[5:]).Println;
Writeln('a[5]=',a[4])
end.
Пример
21 39 45 -22 -17 11 45 -26 8 46 23 12 25 36 -46 -39 -40 49 40
a[5]=-32
Не нашли ответ?
Похожие вопросы