Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Правила Карта форума Темы раздела Блоги Социальные группы Поиск Сообщения за день  
Другие темы раздела
Pascal Создать последовательность аi=100*sin(5/i),сохранить ее в файл округлив до сотых.Найти среднее значение https://www.cyberforum.ru/ pascal/ thread744353.html
добрый день)))Помогите пожалуйста составить программу Создать последовательность аi=100*sin(5/i),сохранить ее в файл округлив до сотых.Найти среднее значение решения задачи использовать циклы с постусловием и параметром. 		Дан массив, состоящий из N элементов.Обнулить все элементы, большие среднего арифметического всех элементов массива Pascal
Дан массив, состоящий из N элементов. Обнулить все элементы, большие среднего арифметического всех элементов массива.
Pascal найти ошибку(переполнение.) Задание во вложении. На 11 строке выдает переполнение. Или ,если не сможите увидеть ошибку,предложите свой вариант программы) http://cs402321.userapi.com/v402321866/6a1d/GHGXpQJaXuE.jpg Program fuuuuu; Const e=0.001; Var a,s,f,x:real; k:integer; Function F1(n:real;m:byte):real; Var i:integer; p:real; https://www.cyberforum.ru/ pascal/ thread744324.html Pascal Сформировать массив по правилу https://www.cyberforum.ru/ pascal/ thread744281.html
помогите найти ошибку пожалуйста.. Даны числа x, y и массив A(a1,a2,...,a10). Образуйте массив B(b1,b2,...,b10) по правилу: (x/y)*a , если i-четное; b= x*y*a , если i-нечетное.
Pascal Нарисовать олимпийский флаг
нарисуйте пожалуйста олимпийский флаг. Pascal. 		Pascal Даны действительное число a и натуральное число n.Вычислить P=a(a-n)(a-2n)...(a-n2) 2)Использование операторов цикла while и repeat.Даны действительное число a и натуральное число n.Вычислить P=a(a-n)(a-2n)...(a-n2) . https://www.cyberforum.ru/ pascal/ thread744228.html
Pascal Выяснить какие из четырех точек находятся на максимальном расстоянии друг от друга https://www.cyberforum.ru/ pascal/ thread744227.html
3)Четыре точки заданы своими координатами x={x1,x2}, y={y1,y2}, z={z1,z2}, p={p1,p2}. Выяснить какие из них находятся на максимальном расстоянии друг от друга и вывести из на печать значение этого расстояния. Вычисление расстояния между двумя точка оформить в виде процедуры. Исходные данные: x={4,8;-3};y={-6,5;1,2}, z={-3,7; -4,5}, p={7,8;2}. 		Разработка циклической программы с известным количеством повторений Pascal
Определить количество положительных элементов матрицы.
Pascal Вычислить значение выражения 1)цикл с неизвестным числом повторений https://www.cyberforum.ru/ pascal/ thread744214.html Pascal Запись: Найти багаж, средний вес одной вещи в котором отличается не более, чем на 0,3 кг от общего среднего веса вещи https://www.cyberforum.ru/ pascal/ thread744203.html
Багаж пассажира характеризуется количеством вещей и общим весом вещей. сформировать переменную Bagaj, содержащую сведения о багаже нескольких пассажиров. Сведения о багаже каждого пассажира представляют собой запись с двумя полями: одно поле целого типа(кол-во вещей) и одно действительное(вес в кг)... Найти багаж, средний вес одной вещи в котором отличается не более, чем на 0,3 кг от общего...
Pascal Определить трехзначное число, обладающим свойством :число начинается цифрой 4
Определить трехзначное число, обладающим свойством :число начинается цифрой 4. Если эту цифру перенести в конец числа , получим число, составляющее 3/4 исходного числа. Вывести на печать оба числа. 		Pascal Двумерный массив. Сформировать по условию Ребятушки помоги пожалуйста! сформировать и вывести на печать матрицу А , элементы которой заданы произвольно, кроме элементов расположенных в заштрихованной области (рисунок b ) и равных нулю.Найти и вывести на печать номер и элементы строки,имеющие наибольшее количество нулевых элементов.... вот рисунок https://www.cyberforum.ru/ pascal/ thread744152.html
durila :d
125 / 107 / 98
Регистрация: 21.12.2012
Сообщений: 160
24.12.2012, 16:49 0

Найти сумму элементов массива в заштрихованной области двумерного массива - Pascal - Ответ 3909355

24.12.2012, 16:49. Показов 2805. Ответов 1
Метки (Все метки)
Лучший ответ Сообщение было отмечено AveRtS как решение

Решение

Добрый день.

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

program matr_summ;
 
const
 N=3; {размер матрицы (нечетное число)}
 
var
 i,j,summ,M:integer;
 Mas:array [1..N,1..N] of integer;
 
Begin
 
{ fill Mas }
 
 randomize;
 for i:=1 to N do 
 for j:=1 to N do mas[i,j]:=random(100);
 
{ calc. summ }
 
 M:=N div 2 + 1;
 for i:=N downto M do 
 for j:=(N-i)+1 to i do inc(summ,mas[i,j]);
 
{ output }
 
 for i:=1 to N do begin 
 for j:=1 to N do write(mas[i,j]:2,' ');
                  writeln()
                  end;
 write('Summ: ',summ);
End.


Вернуться к обсуждению:
Найти сумму элементов массива в заштрихованной области двумерного массива Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 24.12.2012, 16:49
Готовые ответы и решения:

Найти S - сумму элементов из заштрихованной области массива А
Помогите пожалуйста с задачами, очень нужно в институт. задача. По заданным вещественным числам...

Найти сумму элементов массива в заштрихованной области двумерного массива
1.Найти сумму элементов массива в заштрихованной области двумерного массива.

Найти сумму элементов двумерного массива в заштрихованной области
Привет Проблема))) Нужно найти сумму элементов двумерного массива(3х3) в заштрихованной области

Найти S - сумму элементов из заштрихованной области массива A
пожалуйста помогите с решением: VAR A:ARRAY OF REAL; S:REAL; Найти S - сумму элементов из...

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 24.12.2012, 16:49
Помогаю со студенческими работами здесь

Найти сумму элементов массива из заштрихованной области
Помогите кто-нибудь с задачкой, что-то я совсем ее не пойму(( Найти сумму из заштрихованной...

Найти сумму элементов из заштрихованной области массива
Помогите пожалуйста с задачей! var A:array of real; s:real; Найти s-сумму элементов из...

Найдите сумму элементов из заштрихованной области массива...
Найдите сумму элементов из заштрихованной области массива размерностью N на N. (заштрихованая...

Найти сумму элементов из заштрихованной области массива A.
рисунок Дан двумерный массив A целых чисел. Найти S - сумму элементов из заштрихованной области...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru