Есть ответ 👍

Составить программу.сформировать одномерный массив n=10 a[i]=i^3 1 8 найти сумму 1-го,5-го и последнего элемента.

278
464
Посмотреть ответы 3

Ответы на вопрос:


Const       n = 10; var       a: array[1..n] of integer;       i: integer; begin       for i : = 1 to n do               a[i] : = i * i * i;             writeln(a[1] + a[5] + a[n]); end.

1. короткий вариант // pascalabc.net 3.1, сборка 1230 от 27.04.2016 begin   var a: =1.to(10).select(x-> x*x*x).toarray; a.println;   writeln('s=',a[0]+a[4]+a[9]) end. результат 1 8 27 64 125 216 343 512 729 1000 s=1126 2. школьный вариант // pascalabc.net 3.1, сборка 1230 от 27.04.2016 var   i: integer;   a: array[1..10] of integer; begin   for i: =1 to 10 do begin       a[i]: =i*i*i;       write(a[i],' ')       end;   writeln;   writeln('s=',a[1]+a[5]+a[10]) end.

Монитор, терминал, дисплей, телевизор,принтер,плотер

Популярно: Информатика