Ответ.
Меню
Задать вопрос!
Вход
Регистрация
Задать вопрос!
Меню
Все категории
Фотография и видеосъемка
Знания
Другое
Гороскопы, магия, гадания
Общество и политика
Образование
Путешествия и туризм
Искусство и культура
Города и страны
Строительство и ремонт
Работа и карьера
Спорт
Стиль и красота
Юридическая консультация
Компьютеры и интернет
Товары и услуги
Темы для взрослых
Семья и дом
Животные и растения
Еда и кулинария
Здоровье и медицина
Авто и мото
Бизнес и финансы
Философия, непознанное
Досуг и развлечения
Знакомства, любовь, отношения
Наука и техника
Amali
[31]
3 года назад
7
Составить программу.Сформировать одномерный массив n=10 a[I]=i^3 1 8 27... найти сумму 1-го,5-го и последнего элемента.
Знания
Информатика
Ответить
Комментировать
Отправить
2
ответа:
lexa0856
3 года назад
0
0
<u>1. Короткий вариант</u>
// 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.
<u><em>Результат</em></u>
1 8 27 64 125 216 343 512 729 1000
s=1126
<u>2. Школьный вариант</u>
// 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.
Отправить
Ginex007
[51]
3 года назад
0
0
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 до 90.Напишите програ
Гиниятуллин Салав...
Фиг его знает там вроде изи
0
0
4 года назад
Рисунок размером 256 на 128 пикселей занимает в памяти 12 Кбайт(без учета сжатия).Найдите максимальное возможное количество цвет
Роман Трубчанинов
Решение смотри во вложении.
0
0
4 года назад
ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!! ОЧЕНЬ СИЛЬНО ПРОШУ ЭТО ОЧЕНЬ ВАЖНО!!!!!!!!!!!!
Aleksandr1986
1-2-4-3-5 хотя сто процентов гарантировать не могу, путано оно немного
0
0
3 года назад
Помогите, пожалуйста, решить задачу. Найти сумму элементов массива. Кол-во элементов = 10. Сами элементы генерируются случайным
Анюта12346 [3]
<em>// PascalABC.NET 3.3, сборка 1633 от 10.02.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ArrRandom(10,-50,50).Println.Sum.Println;
end.
<u>Пример</u>
31 19 1 -45 -14 -32 8 -46 46 -18
-50
0
0
3 года назад
Прочитать ещё 2 ответа
Приведите примеры обработки информации , при которой изменяется форма представления информации А) из текстовой -- в графическую
Ольга1405
Из зрительной в звуковую
0
0
2 года назад
Смотрите также:
Текст из 600 символов известно что символы берутся из таблицы размером 16 на 32 Определите информационный объем текста в битах
5
·
1 ответ
Срочно 25 26 прошу.... ..
7
·
1 ответ
напишите класс который принимает с клавиатуры целое число и выводит на экран его квадрат но только в случае,если введенное число
6
·
2 ответа
Срочно! С решением.. Документ объемом 16 Мбайт можно передать с одного компьютера на другой двумя способами: А) сжать архивато
5
·
1 ответ
Помогите!!!!!!!!!((((
8
·
1 ответ
Помогите,пожайлуста! узнайте в дополнительных источниках информации историю английской раскладкой клавиатуры
6
·
1 ответ
Дана последовательность чисел:12323. К ней применён следующий цикл обработки:1. Все цифры "1" заменить на "33"2. Все цифры "2" з
7
·
1 ответ
Объем флешки 14,9 ГБ сколько музыкальных файлов размером примерно по 4,4 Мб можно на нее записать?
5
·
1 ответ
Логикалык амалдар туралы реферат
9
·
1 ответ
В школе учится 1600 учеников. Из них 950 посещают кружки, 1052-посещают спортивные секции, 80 учащихся не посещают ни кружки, ни
14
·
1 ответ
×
Добавить ответ
Отправить
×
Вход
E-mail
Пароль
Запомнить меня
Войти
Не зарегистрированы?
Пройти быструю регистрацию
×
Регистрация
Ваше имя
E-mail
Пароль
Зарегистрироваться
close
Вход
Регистрация
Задать вопрос!