Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
MasQueNada
#1

Массивы. Заполнение по формуле. - Pascal ABC

28.02.2013, 21:35. Просмотров 276. Ответов 0
Метки нет (Все метки)

Помогите...

Даны массивы l1, ... , l15 ; m1, ... , m8 .
Определить (см. картинку)


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
program VF_4;
  uses crt;
  var
     L,C:array[1..15] of real;
     M,D:array[1..8] of real;
     cs,ds:real;
     i, j:integer;
     
begin
 
 ds:=0;
     WriteLn('введите массив M(8):');
     for j:=1 to 8 do begin
         Read(m[j]);
         ds:=ds+sqr(m[j]);
     end;
   cs:=0;
     WriteLn('введите массив L(15):');
     for i:=1 to 15 do begin
         Read(l[i]);
         cs:=cs+(l[i]-m[1]);
     end;
     
     
         
 
     for i:=1 to 15 do begin
         c[i]:=cs/l[i];
         Write(c[i]:6:1);
     end;
     WriteLn;
     for j:=1 to 8 do begin
         d[j]:=m[j]*(ds/sqr(l[5]));
          Write(d[j]:6:1);
     end;
         
 
end.
Миниатюры
Массивы. Заполнение по формуле.  
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.02.2013, 21:35
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Массивы. Заполнение по формуле. (Pascal ABC):

Даны массивы A(8), F(8),Q(8). Сформировать массивы С(8), каждый элемент которого вычисляется по формуле - Pascal ABC
uses crt; type mas=array of integer; var A,F,Q,C:mas; i,s:integer; begin clrscr; writeln('Массив первый:'); for i:=1...

Двумерный массив. Заполнение по формуле. - Pascal ABC
Заполнить двухмерный массив по формуле 2•u•j и посчитать кол. Эле кратных 3

Заполнение элементов массива по формуле - Pascal
Найти элементы вещественного массиваY(всего 6 элементов) по формуле: Yi=0.1*tg 0.1i. элементы массива вывести на экран

массивы - рандомное заполнение - Pascal
подскажите плиз как описать матрицу 8х8 и заполнить ее случайными числами от -n до n, где n - номер элемента матрицы?

Двумерные массивы(заполнение) - Pascal
Добрый вечер.. Задача: Заполнить массив по следующиму правилу:элементы главной диагонали равны 3,ниже главной диагонали -1,а выше -...

Двумерные массивы. Заполнение не стандартно. - Pascal
Здравствуйте! Прошу помощи у знающих людей. Задача состоит в следующем: нужно заполнить двумерный массив, таким образом: .. .. .....

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.02.2013, 21:35
Привет! Вот еще темы с ответами:

Массивы. Заполнение массива в заданном интервале - Pascal ABC
Помогите пожалуйста! Задали описать массивна паскале абц, который заполняется случайными числами в интервале т1-т2. Интервал задается...

Заполнение квадратами. Заполнение, начиная с X. Прогрессия X-D - Pascal ABC
Помогите пожалуйста 1.Напишите программу, которая заполняет массив квадратами натуральных чисел от 1 до N . Входные данные Входная...

Заполнение массива по формуле - C#
Заполнить массив размерностью произведение номера столбца на удвоенный квадратный корень номера строки. Помогите ,на языке C#

[Turbo Prolog] Заполнение списка пятью элементами по формуле A(N)=1/N - Prolog
Добрый вечер. Суть задачи: Составьте программу заполнения списка пятью элементами, которые вычисляются по формуле A(N)=1/N. Есть код...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru