Pascal ABC

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

Войти

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

Другие темы раздела
Pascal ABC Как извлечь кубический корень если у нас отрицательное число? При написании проги решения кубических уравнений столкнулся с проблемой извлечения кубического корня из числа. Помогите кто может https://www.cyberforum.ru/ pascalabc/ thread393110.html	Заполнение матрицы порядка n Pascal ABC Всем привет! Помогите решить задачу на заполнение матрицы порядка n по следующему образцу: 1 2 3 . . . (n-2) (n-1) (n) 2 1 2 . . . (n-3) (n-2) (n-1) 3 2 1 . . . (n-4) (n-3) (n-2) ... ... ... . . . ... ... ... (n-1) (n-2) (n-3) . . . 2 1 2 (n) (n-1) (n-2) . . . 3 2 ...
Pascal ABC Вычислить бесконечную сумму https://www.cyberforum.ru/ pascalabc/ thread393083.html Вычислить бесконечную сумму с заданной точностью eps (eps>0). Считать, что точность достигнута, если очередное слагаемое по модулю меньше eps – все последующие слагаемые можно не учитывать. S = 1/(12) + 1/(23) + ... + 1/(i*(i+1)) + ... помогите выполнить, вроде просто но бесконечная сумма не ясно че с ней делать.	Pascal ABC Вычислить количество нечётных элементов в массиве из 30 чисел https://www.cyberforum.ru/ pascalabc/ thread393079.html Вычислить количество нечётных элементов в массиве из 30 чисел(паскаль)
вычислить сумму натуральных чисел. Pascal ABC С клавиатуры запрашиваются два натуральных числа(каждое из них больше 5000000000, но меньше 5000000000000).Необходимо вычислить их сумму.	Pascal ABC Переменной S присвойте: (а) пустое множество; (б) множество из строчных гласных латинских букв (a, e, i, o, u); (в) множество, содержащее все цифры. Переменной S присвойте: (а) пустое множество; (б) множество из строчных гласных латинских букв (a, e, i, o, u); (в) множество, содержащее все цифры. https://www.cyberforum.ru/ pascalabc/ thread393060.html
Pascal ABC После поступления в педагогический вуз о студентах собрана следующая информация: фамилия, нуждается ли в общежитии, стаж, работал ли учителем, что око https://www.cyberforum.ru/ pascalabc/ thread393059.html После поступления в педагогический вуз о студентах собрана следующая информация: фамилия, нуждается ли в общежитии, стаж, работал ли учителем, что окончил, какой язык изучал. Составьте программу, определяющую: сколько человек нуждаются в общежитии, списки студентов, проработавших 2 и более лет учителем, списки окончивших ранее педучилище, списки языковых групп.	Pascal ABC задача про Палиндром получить все меньшие 10^6 натуральные числа, которые являются палиндромами (натуральное число запись которого одинаково с начала и с конца 4884, 363) как в десятичной так и в двоичной системах.
Pascal ABC Определить разность наибольшего и наименьшего элементов матрицы Составить схему алгоритма и программу определения разности наибольшего и наименьшего элементов массива вещественных чисел М={mi}, i=1,t, t- число элементов массива (t≤50). Вывести на экран найденную разность, а также наибольшее и наименьшее значения и их адреса в массиве М. https://www.cyberforum.ru/ pascalabc/ thread393048.html	Pascal ABC 2 одномерных массива. https://www.cyberforum.ru/ pascalabc/ thread393009.html 1.Ввести одномерный массив А, вывести его. На место минимального элемента массива записать сумму последних трёх ненулевых элементов массива. На экран вывести массив после преобразования, или сообщение о невозможности модификации. 2.Дан массив K(N) (N<=50). Преобразовать его, упорядочив по убыванию все его элементы, стоящие после второго нулевого элемента. Выдать на печать исходный и...
Нарисовать шахматную доску Pascal ABC 1)создать программу ,когда рисуешь один прямоугольник и из него делаешь шахматную доску 2)нарисовать машинку движение	Pascal ABC Найти суммы заштрихованных областей матрицы Дан двумерный массив с четным количеством элементов, найти суммы заштрихованных областей. помогите пожалуйста https://www.cyberforum.ru/ pascalabc/ thread392954.html

КонецСвета

Почетный модератор

7966 / 3937 / 2464

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

Сообщений: 5,377

27.11.2011, 17:45

Получить квадратную матрицу по правилу - Pascal ABC - Ответ 2219214

27.11.2011, 17:45. Показов 1214. Ответов 1

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

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

Решение

Pascal

uses crt;
var a: array [1..100,1..100] of integer;
    i,j,n: integer;
begin
write('N=');
readln(n);
for i:=1 to n do
    begin
    for j:=1 to n do
        begin
        if i=j then a[i,j]:=i-1
           else a[i,j]:=0;
        write(a[i,j]:3);
        end;
    writeln;
    end;
end.

Вернуться к обсуждению:
Получить квадратную матрицу по правилу Pascal ABC

Programming

Эксперт

94731 / 64177 / 26122

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

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

27.11.2011, 17:45

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

Получить квадратную матрицу по правилу
Получить квадратную матрицу n 0 0 0 ... 0 0 0 1 0 ... 0 0 0 2 0 ... 0 0 ...

Получить квадратную матрицу по правилу
3. Решить задачу: заполнить квадратную матрицу порядка N по следующему правилу: на главной...

Получить квадратную матрицу по правилу
Заполнить квадратную матрицу порядка N по следующему правилу: элементом массива является степень,...

Получить квадратную матрицу по правилу
Привет всем, помогите получить матрицу и по возможности не много объяснить принцип. Не первый раз...

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

27.11.2011, 17:45

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

Получить квадратную матрицу по правилу
Получить квадратную матрицу порядка n:

Получить квадратную матрицу по правилу
Даны действительные числа a1,a2,a3..an вводимые с клавиатуры. Получить квадратную матрицу порядка...

Получить квадратную матрицу по правилу
Заранее огромное спасибо!

Получить квадратную матрицу по правилу
Здравствуйте друзья, помогите получить квадратную матрицу порядка N:

Наверх