Задания на массивы решилбы кто!

@doom11111 · Регистрация: 20.05.2010

Студворк — интернет-сервис помощи студентам

1. Массивы:
1. Поменять местами треугольники квадратной матрицы, расположенные выше и ниже боковой диагонали.
50. Даны массив А из n элементов и число K. Переставить элементы массива А так, чтобы все элементы со значением, большим, чем число K, попали в первую половину массива, а остальные – во вторую.
3. Записи:
38. В библиотеке для каждого заказывающего книгу читателя заполняется карточка: фамилия, дата заказа, дата выдачи книги. Определить: 1) самый маленький срок, за который нашли книгу; 2) сколько заказов было не удовлетворено.

@yanyk1n · 20.05.2010, 21:56

1. Основная логика

Pascal
1
2
3
4
5
6
7
for i:=1 to N do
for j:=1 to N-i do
begin
 b:=a[i,j];
 a[i,j]:=a[N-j+1,N-i+1];
 a[N-j+1,N-i+1]:=b;
end;

@doom11111 · 20.05.2010, 22:27 **[ТС]**

Что-то не то! Весь код скинь pliz

@yanyk1n · 20.05.2010, 23:30

doom11111, могли бы и сами догадаться в чём ошибка. Исправил:

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
32
33
34
35
uses crt;
const N = 4;
var a:array[1..N, 1..N]of integer;
i,j,b:integer;
 
begin
    clrscr;
    randomize;
    writeln('Исходная матрица');
    for i:=1 to N do
    begin 
        for j:=1 to N do
        begin
            a[i,j]:=random(100);
            write(a[i,j]:3);
        end;
        writeln;
    end;
 
    for i:=1 to N do
    for j:=1 to N-i do
    begin
        b:=a[i,j];
        a[i,j]:=a[N-j+1,N-i+1];
        a[N-j+1,N-i+1]:=b;
    end;
 
    writeln('Преобразованная матрица');
    for i:=1 to N do
    begin 
        for j:=1 to N do write(a[i,j]:3);
        writeln;
    end;
    readln;
end.

@doom11111 · 20.05.2010, 23:36 **[ТС]**

Ещё две осталось но у же легче!

Новые блоги и статьи Все статьи Все блоги /
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .	SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .

@doom11111 0 / 0 / 0 Регистрация: 20.05.2010 Сообщений: 14

	Задания на массивы решилбы кто! 20.05.2010, 21:47. Показов 762. Ответов 4 Метки нет (Все метки) 1. Массивы: 1. Поменять местами треугольники квадратной матрицы, расположенные выше и ниже боковой диагонали. 50. Даны массив А из n элементов и число K. Переставить элементы массива А так, чтобы все элементы со значением, большим, чем число K, попали в первую половину массива, а остальные – во вторую. 3. Записи: 38. В библиотеке для каждого заказывающего книгу читателя заполняется карточка: фамилия, дата заказа, дата выдачи книги. Определить: 1) самый маленький срок, за который нашли книгу; 2) сколько заказов было не удовлетворено. 0

@doom11111 0 / 0 / 0 Регистрация: 20.05.2010 Сообщений: 14
	20.05.2010, 22:27 [ТС]
	Что-то не то! Весь код скинь pliz 0

@doom11111 0 / 0 / 0 Регистрация: 20.05.2010 Сообщений: 14
	20.05.2010, 23:36 [ТС]
	Ещё две осталось но у же легче! 0