Консультация № 198408
27.04.2020, 13:58
0.00 руб.
0 1 1
Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос:

Сформировать массив из 10 элементов, элементы которого равны удвоенному значению их индекса, а пятый и десятый элементы равны нулю.

pascal

Обсуждение

давно
Профессор
401888
1232
27.04.2020, 18:24
общий
это ответ
Здравствуйте, Ericsson!
[code lang=pascal]const n=10;
var a:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
begin
if i in [5,n] then a[i]:=0
else a[i]:=2*i;
write(a[i]:3);
end;
end.[/code]
5
Форма ответа