Pascal (Паскаль)

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

Войти

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

Другие темы раздела
Pascal Записать элементы массива в обратном порядке Записать елементы массива А(n) в обратном порядке ПОМОГИТЕ РЕШИТЬ))))!!! https://www.cyberforum.ru/ pascal/ thread58450.html	Олимпиада "Уравнение по основанию" Pascal Запись Ax обозначает, что A есть запись числа в системе счисления по основанию X. Если X>10, то для записи числа используйте кроме цифр от 0 до 9 заглавные буквы от A до Z. При этом условии X не может быть больше 36. Требуется написать программу. которая по заданным A и B найдет решение уравнения Ax = B, либо сообщит об условии у него решений. число В (1<=B<=10 в седьмой степени) - из десятичной...
Pascal Вывести список не аттестованных по 3 предметам Мне дана задача: Даны сведения о результатах аттестации, ФИО студента, название пяти предметов и баллы, полученные по каждому предмету. Вывести фамилии студентов, не аттестованных по трем и более предметам. Вот что я сам набросал: Program geto; Const Max=10; Type atestat=record m1:0..10; m2:0..10; https://www.cyberforum.ru/ pascal/ thread58444.html	Pascal Целочисленная арифметика Дано целое число n>2. Напечатать все простые числа из диапазона (Простые числа-числа которые делятся только на само себя и на 1) https://www.cyberforum.ru/ pascal/ thread58436.html
массивы Pascal помогите пожалуйста, соттавить программу подсчета максимального количества подряд идущих элементов, каждый из кототых больше предыдущего	Pascal Вычислить сумму ряда Вычисления вести до тех пор, пока абсолютная величина разницы между двумя соседними членами рядаn-1-Un]не превышает величину Е (10 в степени -3>E>10 в степени -4). Значение переменной вібрать самостоятельно. 1-х+х(кв)-х(куб)+х(в 4 ст)+...+(-1)(в ст n-1)*х(в ст n-1)+... https://www.cyberforum.ru/ pascal/ thread58426.html
Pascal процедуры и функции, блок-схема. https://www.cyberforum.ru/ pascal/ thread58417.html Здравствуйте все! У меня такой вопрос - подскажите пожалуйста- как в блок-схеме описать действие процедуры и функции, не вызов, а именно то что она делает. заранее благодарю.	Все элементы с наибольшим значением в данной квадратной матрице целых чисел порядка n заменить нулями Pascal Составить алгоритм и программу для решения задачи. Все элементы с наибольшим значением в данной квадратной матрице целых чисел порядка n заменить нулями.
Pascal Массив, среднее арифметическое. составьте на паскале программу вычисления среднего арифметического отрицательных элементов https://www.cyberforum.ru/ pascal/ thread58410.html	Pascal Сумма элементов массива. https://www.cyberforum.ru/ pascal/ thread58409.html сделайте программу вычисления в массив суммы положительных элементов.
функции и процедуры Pascal Пусть задана квадратная матрица порядка m и натуральное число n. Нужно найти Аn. Использовать алгоритм: если n=2k, то А^n= (А^2)^к. Если n=2k+1, то А^n= ((А^2)^k)А. Для к дальше применяют тот же алгоритм. буду очень благодарна за помощь)	Pascal Файлы, записи. Доброе время суток. Помогите пожалуйста решить такую вот делему: 1. Что такое вариантные поля? 2. Отсортировать таблицу с помощью генератора случайных чисел(в главной програме)(случайная сортировка: за увелечением или по убыванию)? Вот само задание: (таблица дается на усмотрение учащегося) Выполнить с подпрограмами(procedure, function) В таблице хранятся целые, вещественные и текстовые... https://www.cyberforum.ru/ pascal/ thread58400.html

meter

СтудентЪ из Кызылорды

25 / 23 / 9

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

Сообщений: 144

23.10.2009, 22:04

Расчет суммы положительных элементов строки двумерного массива - Pascal - Ответ 318298

23.10.2009, 22:04. Показов 1526. Ответов 1

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

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

Решение

Pascal

program geto;
var a:array [1..10,1..10] of integer;
s,i,j,m,n,x:integer;
begin
write('m=');
readln(m);
write('n=');
readln(n);
for i:=1 to m do
begin
for j:=1 to n do
begin
write('a[',i,',',j,']=');
readln(a[i,j]);
end;end;
s:=0;
for i:=1 to m do 
for j:=1 to n do
if (a[i,j]>0) then s:=s+a[i,j];
writeln('s=',s);
end.

на сколько я понял это будет выглядеть так=)

Вернуться к обсуждению:
Расчет суммы положительных элементов строки двумерного массива Pascal

Programming

Эксперт

94731 / 64177 / 26122

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

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

23.10.2009, 22:04

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

Расчет суммы отрицательных элементов двумерного массива
Составить программу для: а) расчета суммы отрицательных элементов двумерного массива; б) расчета...

Вычислить разность суммы положительных и абсолютного значения суммы отрицательных элементов массива
Ввести с клавиатуры вещественный массив из n элементов (задано константой). Вычислить разность...

Найти количество положительных элементов двумерного массива, которые делятся на 2,и их произведение.
(Двумерные массивы) Задан двумерный массив целых чисел А размером N на M,состоящий из...

Найти произведение минимального элемента на сумму положительных элементов двумерного массива
Найти произведение минимального элемента на сумму положительных элементов двумерного массива....

	23.10.2009, 22:04

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

23.10.2009, 22:04

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

поиск суммы элементов двумерного массива, имеющих заданную разность индексов
помогите пожалуйста решить задачку через массив.:( Составить программу поиска суммы элементов...

Вычисление суммы положительных элементов каждой строки матрицы
Использование суб-функцию для вычисления суммы положительных элементов каждой строки матрицы...

Для каждого столбца двумерного массива подсчитать сумму четных положительных элементов
Дан массив размером n×n, элементы которого целые числа Для каждого столбца подсчитать сумму четных...

написать программу нахождения суммы элементов двумерного массива, расположенных ниже главной диагонали
пожалуйста, помогите решить две задачи через процедуры: 1. написать программу заполнения...

Наверх