Сформировать и вывести массив mas, состоящий из N элементов. Значение mas[шаг] должно равняться сумме квадрата шага и его корню квадратному.
Решение:
|
1
2 3 4 5 6 7 8 9 10 11 12 13 |
program arrays_3;
uses crt; var n, i, sum: integer; mas: array[1..100] of real; begin clrscr; write(‘Количество элементов > ‘); read(n); for i:=1 to n do mas[i]:=sqr(i)+sqrt(i); for i:=1 to n do write(mas[i]:3:2, ‘ ‘); readkey; end. |