Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > Pascal ABC
Войти
Регистрация
Восстановить пароль
Правила Карта форума Темы раздела Блоги Социальные группы Поиск Сообщения за день  
Другие темы раздела
Pascal ABC Подсчитать количество строк, содержащих введённое слово https://www.cyberforum.ru/ pascalabc/ thread1585909.html
Дан текст,хранящийся в текстовом файле.Вводиться слово.Подсчитать количество строк,содержащих введённое слово. Зарание благодарю :) 		В заданном массиве найти все числа, меньшие заданного А Pascal ABC
В заданном массиве найти все числа, меньшие заданного А, и переместить их в начало массива в той же последовательности, как они встречаются. Вывести полученный массив. *Формат входных данных В первой строке входного файла записаны через пробел два целых числа N и A (1≤N≤10 000, 0≤A≤1 000 000 000). Во второй строке через пробел записаны N целых неотрицательных чисел, не...
Pascal ABC В заданной строке переведите первую букву каждого слова в верхний регистр https://www.cyberforum.ru/ pascalabc/ thread1585769.html
В заданной строке переведите первую букву каждого слова в верхний регистр. Разделителями слов являются пробелы и знаки препинания. Выведите полученную строку. Формат входных данных Во входном файле записана непустая строка длиной не более 1*000*000 символов. В строке могут содержаться латинские буквы в нижнем регистре, пробелы, точки, запятые, восклицательные знаки, вопросительные знаки и точки... 		Pascal ABC Вычислить значение функции https://www.cyberforum.ru/ pascalabc/ thread1585733.html
4. Вычислить значение функции y=1/(x-5), на отрезке от 0 до 10 с шагом 1 и с проверкой отсутствия деления на 0.
Pascal ABC Определить, что больше сумма ряда или произведение
3. Определить, что больше сумма ряда: 1.1 , 1.3 , … , 93.1 или произведение: 5*7*…*11. 		Pascal ABC Вывести таблицу функции y=cos(x) , где x изменяется в градусах от 10 до 45 с шагом 5 https://www.cyberforum.ru/ pascalabc/ thread1585731.html
2. Вывести таблицу функции y=cos(x) , где x изменяется в градусах от 10 до 45 с шагом 5
Pascal ABC Вычислить сумму ряда 1. Вычислить сумму ряда: 0.6, 0.7, 0.8, 0.9. https://www.cyberforum.ru/ pascalabc/ thread1585730.html Pascal ABC Нарисуйте сетку 20х20, состоящую из разноцветных прямоугольных треугольников четырех видов, различающихся расп
нарисуйте сетку 20х20, состоящую из разноцветных прямоугольных треугольников четырех видов, различающихся расположением прямого угла.
Pascal ABC Зная координаты вершин четырехугольника, найти его периметр https://www.cyberforum.ru/ pascalabc/ thread1585581.html
Зная координаты вершин четырехугольника найти его периметр 		Pascal ABC Какой из трех треугольников, заданных координатами своих вершин, имеет наибольший периметр? https://www.cyberforum.ru/ pascalabc/ thread1585569.html
Из трех треугольников , заданных координатами своих вершин , имеет больший периметр ?
Забавная идейка по реализации мелкого чат бота Pascal ABC
Всем доброго времени суток. Решил помочь девушке для зачета выполнить её задания и что-то меня по старой памяти затянуло) Появилась идейка в голове мелкая, суть мелкая программа, чат с ботом. Ну и как у всех бывает столкнулся с трудностями при попытке реализовать, может кто подкинет пример? буду очень признателен) Описание программы что и как Окно программы, по центру окно что-то типо... 		Pascal ABC Составить программу вычисления значений функции https://www.cyberforum.ru/ pascalabc/ thread1585425.html
Составить программу вычисления N значений функции Y для X, изменяющегося от X1 c шагом dX.Для проверки правильности программы задать значения для A,X1 и dX из второй таблицы. Вложение удалено.
Почетный модератор
64291 / 47589 / 32740
Регистрация: 18.05.2008
Сообщений: 115,181
19.11.2015, 15:32 0

написать программу двумерный массив .Дана квадратная матрица порядка М, заполненная произвольным образом целы - Pascal ABC - Ответ 8364338

19.11.2015, 15:32. Показов 1695. Ответов 1
Метки (Все метки)
Лучший ответ Сообщение было отмечено Анютка98 как решение

Решение

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

const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
    m,i,j:integer;
    s:real;
begin
randomize;
repeat
write('Размер матрицы от 2 до ',nmax,' m=');
readln(m);
until m in [2..nmax];
writeln('Исходная матрица:');
s:=0;
for i:=1 to m do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=-8+random(24);
    write(a[i,j]:4);
    if j=m-i+1 then s:=s+a[i,j];
   end;
  writeln;
 end;
s:=s/m;
writeln('Среднее арифметическое элементов побочной диагонали=',s:0:2);
end.


Вернуться к обсуждению:
написать программу двумерный массив .Дана квадратная матрица порядка М, заполненная произвольным образом целы Pascal ABC
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 19.11.2015, 15:32
Готовые ответы и решения:

написать программу с указателями. дана действительная квадратная матрица порядка n
написать программу с помощью указателей. дана действительная квадратная матрица порядка n. Найти...

Дана квадратная матрица A порядка M. Начиная с элемента A1,1, вывести ее элементы следующим образом («уголками»)
Дана квадратная матрица A порядка M. Начиная с элемента A1,1, вывести ее элементы следующим образом...

Дана квадратная матрица размерностью NxN, заполненная целыми числами и величина А
Дана квадратная матрица размерностью NxN, заполненная целыми числами и величина А. Сформировать...

Дана квадратная матрица порядка М, М<=18. Получить массив В, каждый элемент которого
Дана квадратная матрица порядка М, М&lt;=18. Получить массив В, каждый элемент которого есть квадрат...

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

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

Дана квадратная матрица порядка M. Найти сумму элементов ее диагоналей. При написании программу использовать подпрограмму
Дана квадратная матрица порядка M. Найти сумму элементов ее диагоналей. При написании программу...

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

Дана квадратная матрица А порядка n. Проверить, является ли матрица единичной.
Ребят,помогите решить задачу &quot;Дана квадратная матрица А порядка n. Проверить, является ли матрица...

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