Этот заказ уже выполнен на сервисе Автор24
На нашем сайте вы можете заказать учебную работу напрямую у любого из 45000 авторов, не переплачивая агентствам и другим посредникам. Ниже приведен пример уже выполненной работы нашими авторами!
Узнать цену на свою работу

Лабораторные работы Pascal

Номер заказа
130210
Создан
11 июля 2014
Выполнен
2 января 1970
Стоимость работы
400
Надо быстро сделать решение задач по программированию. Есть буквально 1 день. Тема работы «Лабораторные работы Pascal».
Всего было
18 предложений
Заказчик выбрал автора
Этот заказ уже выполнен на сервисе Автор24
На нашем сайте вы можете заказать учебную работу напрямую у любого из 45000 авторов, не переплачивая агентствам и другим посредникам. Ниже приведен пример уже выполненной работы нашими авторами!
Узнать цену на свою работу
Или вы можете купить эту работу...
Страниц: 150
Оригинальность: Неизвестно
400
Не подошла
данная работа?
Вы можете заказать учебную работу
на любую интересующую вас тему
Заказать новую работу

Решенные задачи по темам:
«Циклические перестановки в одномерных массивах»
«Двумерные массивы»
«Обработка двумерных массивов по строкам и столбцам»
«Подпрограммы»

Программы написаны на языке программирования Pascal.
Представлены 6 вариантов по 30 страниц - исходники + блок-схемы + оформленные протоколы.

Задание взято из методичек ВолгГТУ.

Пример условий задач

1. Ввести одномерный целочисленный массив A, вывести его. В массиве отсортировать по возрастанию все элементы предшествующие максимальному.
2. Ввести двумерный массив A3×4. Определить в нём сумму элементов, значения которых лежат вне диапазона [-1;5].
3. Ввести двумерный массив AN × M. Все элементы, которые не кратны 4 и стоят в четных строках массива уменьшить на 10. Массив вывести до и после преобразования.
4. Ввести двумерный массив AN × M, вывести его. Если значение суммы элементов его главной диагонали превышает сумму элементов побочной, то квадратом полученной разности заменить отрицательные элементы под побочной диагональю.
5. Ввести целочисленную квадратную матрицу AN × M, вывести ее. Найти сумму элементов в той строке, где произведе Показать все
Пример листинга:

Листинг программы на Pascal

program ABC;
uses crt;
const Nmass=100;
var A:array[1..Nmass] of integer;
i, j,k, p,N, max, maxmin, poz1,poz2, tmp,z:integer;
begin
ClrScr;
write('Размерность массива:');
readln (N);
writeLn('Введите массив A:');
for i:=1 to N do
begin
write('A[',i,']=');
readLn(A[i]);
end;
writeln('');
max:=A[1];
for i:=1 to N do
if (A[i]>max) then
begin
max:=A[i];
k:=i; end;
writeln ('Максимальный элемент : ',max,' ­ на позиции ',k);
for i:=1 to k-1 do
begin
for j:=1 to k-i-1 do
if A[j]>A[j+1] then
begin
tmp:=A[j];
A[j]:=A[j+1];
A[j+1]:=tmp;
end;
end;
writeln('');
for i:=1 to N do begin
writeln('A[',i,']=',A[i]);
e Показать все
Методичка ВолгГТУ.
Автор24 - это фриланс-биржа. Все работы, представленные на сайте, загружены нашими пользователями, которые согласились с правилами размещения работ на ресурсе и обладают всеми необходимыми авторскими правами на данные работы. Скачивая работу вы соглашаетесь с тем что она не будет выдана за свою, а будет использована исключительно как пример или первоисточник с обязательной ссылкой на авторство работы. Если вы правообладатель и считаете что данная работа здесь размещена без вашего разрешения - пожалуйста, заполните форму и мы обязательно удалим ее с сайта. Заполнить форму
Оценим бесплатно
за 10 минут
Эта работа вам не подошла?
У наших авторов вы можете заказать любую учебную работу от 200 руб.
Оформите заказ и авторы начнут откликаться уже через 10 минут!
Заказать решение задач