Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

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

Другие темы раздела
Pascal Вычислить значение составной функции https://www.cyberforum.ru/ pascal/ thread856645.html Не понимаю в паскале,поэтому прошу помочь мне с решением этих задач:	*Дана матрица mn, найти среднее арифметическое минимальных элементов в каждом столбце Pascal** Дана матрица m*n, найти среднее арифметическое минимальных элементов в каждом столбце
Pascal В алфавитном порядке вывести согласные, которые входят в каждое нечетное слово и не входят более, чем в одно четное слово Не могли бы вы мне помочь, пожалуйста. У меня есть решенная задача где требуется найти следующее:"В алфавитном порядке вывести все звонкие согласные, которые входят в каждое нечетное слово и не входят ни в одно четное слово". Привожу данную программу ниже. program 6; function UpCaseRus(C:char):Char; var s1,s2:string; R1:char; begin s1:='йцукенгшщзхъфывапролджэячсмитьбю';... https://www.cyberforum.ru/ pascal/ thread856612.html	Pascal Найдите сумму четных чисел ряда https://www.cyberforum.ru/ pascal/ thread856575.html Не понимаю в паскале,поэтому прошу помочь мне с решением этих задач: Введите натуральные числа 1,2,3..n. Найдите сумму четных чисел. Xokker, впредь оформляйте темы по правилам форума: 1) один вопрос - одна тема 2) заголовок должен отражать суть задания 3) текстовые задания набирайте от руки Остальные задания вынесены в отдельные темы
Какие значения может принимать переменная а Pascal Помогите разобраться: Какие значения может принимать переменная а, если она определена следующим образом: a:=2*RANDOM();	Pascal Найти сумму отрицательных элементов, расположенных под главной диагональю https://www.cyberforum.ru/ pascal/ thread856383.html надо написать программу по 2,3,4 пункту, в паскале вообще не шарю плииииззззззззз
Pascal Стандартные операции с массивами https://www.cyberforum.ru/ pascal/ thread855935.html Можете помочь? Завтра сдавать : 1) Вести массив A(N). Найти среднее геометрическое значение массива. Минимальный элемент массива заменить на среднее геометрическое . Вывести преобразованный массив. 2) Вести массив A(N). Найти среднее арифметическое значение массива. Максимальный элемент массива увеличить на среднее арифметическое. Вывести преобразованный массив. 3) Вести массив A(N). Найти...	нарисовать круг по команде с клавиатуры, разбить его на 8 секторов и закрасить их поочередно разными цветами Pascal нарисовать круг по команде с клавиатуры, разбить его на 8 секторов и закрасить их поочередно разными цветами
Pascal Оцените код(забавные законы относительно транспортных средств) Решал лёгкую задачу, решил, но код получился, мне кажется, не очень хорошим. Потом посмотрел решение другого человека, так у него решение оказалось в два раза короче. Пожалуйста посмотрите решения и укажите на ошибки. Условие задачи: В небольшом островном государстве действовали забавные законы относительно транспортных средств – автобусов, грузовиков, легковушек. Во-первых, общее... https://www.cyberforum.ru/ pascal/ thread855778.html	Pascal Составьте прайс-лист магазина "Обувь" https://www.cyberforum.ru/ pascal/ thread855727.html Составьте прайс-лист магазина "Обувь", включающий в себя наименования товара, страну-производитель, его цену, материал изготовления, размер, рекомендации для использования. Информацию о каждом виде товара оформите в программе в виде записи. Совокупность записей объедините в массив. Составьте программу, которая обеспечивает ввод полученной информации, распечатку ее в виде таблицы. Выведите на...
Pascal Найти средний балл В классе 7 учеников, известны результаты сдачи экзаменов по двум предметам. Составьте программу вычисления количества учащихся ,сдавших оба экзамена на отлично.Вывести на экран исходную матрицу -ведомость , результаты подсчета и средний балл по каждому предмету.	Pascal Запись из файла рандомной строки в массив https://www.cyberforum.ru/ pascal/ thread855163.html Здравствуйте, вся суть проблемы заключается в том, что функция возвращает одно и то же значение, а повторений быть не должно. type db = record first: string; end; function randomfirst(): string; var f1: text;

ermolay

3451 / 2389 / 2135

Регистрация: 04.12.2011

Сообщений: 3,966

05.05.2013, 23:31

Построить массив В,элементы которого определяются следующим образом Bi=∑Ai - Pascal - Ответ 4514404

05.05.2013, 23:31. Показов 1906. Ответов 1

Метки (Все метки)

Сообщение было отмечено YellowVit как решение

Решение

Pascal

var
  a,b: array[1..100] of real;
  i,n: integer;
begin
  randomize;
  write('Ââåäèòå ðàçìåð ìàññèâà n: ');
  readln(n);
  writeln('Ìàññèâ A:');
  for i:=1 to n do
  begin
    a[i]:=random*10;
    if i=1 then b[i]:=a[i]
      else b[i]:=b[i-1]+a[i];
    write(a[i]:0:2,' ');
  end;
  writeln;
  writeln('Ìàññèâ B:');
  for i:=1 to n do write(b[i]:0:2,' ');
  readln;
end.

Вернуться к обсуждению:
Построить массив В,элементы которого определяются следующим образом Bi=∑Ai Pascal

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

05.05.2013, 23:31

Готовые ответы и решения:

Образовать массив Z, элементы которого определяются следующим образом
Даны массивы X (x1,x2,...,x10) и Y (y1,y2,...,y10). Образовать массив Z, элементы которого...

Дан массив A размера N. Сформировать новый массив B того же раз- мера, элементы которого определяются следующим образом:
Дан массив A размера N. Сформировать новый массив B того же раз- мера, элементы которого...

Сформировать новый массив В того же размера, элементы которого определяются определенным образом
Дан массив А размера N. Сформировать новый массив В того же размера, элементы которого определяются...

Дано целое число N (>0). Последовательность вещественных чисел Ak определяются следующим образом: A0=2, Ak=2+1/Ak-1, K=1,2,. . Вывести элементы A1,A
Пожайлуйста помогите надо решить задачу за выходные!!! Дано целое число N (>0)....

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

05.05.2013, 23:31

Помогаю со студенческими работами здесь

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

Сформировать одномерный массив, элементы которого определяются по правилу
Задана последовательность X = (x1, x2, …, x10). Сформировать из неё одномерный массив Y, элементы...

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

Дан массив X.Вычислить и напечатать массив Y, элементы которого определяются по формуле |y[i]=x[i]-B|, где B - максимальный элемент массива X
1) Дан массив X.Вычислить и напечатать массив Y, элементы которого определяются по формуле |y=x-B|,...

Массив: сформировать массив C[12] так, чтобы элементы располагались следующим образом: A(1) B(1) A(2) B(2)
из массивов A и B сформировать массив C так, чтобы элементы массива располагались следующим...

Дан массив. Переставить элементы следующим образом a[1], a[12], a[2], a[11],
Дан массив, Переставить элементы следующим образом a, a, a, a, a, a,a, a, a, a, a, a. помогите...

Наверх