Программа «Слово-перевертыш» на языке программирования OpenOffice.org Basic
Проект «Слово-перевертыш» на языках объектно-ориентированного программирования Visual Basic и Gambas
Лабораторная работа № 9. Шаг 2. Решаем задачи на Паскале. Задача 1
Лабораторная работа № 9. Шаг 2. Решаем задачи на Паскале. Задача 2
Лабораторная работа № 9. Шаг 2. Решаем задачи на Паскале. Задача 3
Лабораторная работа № 9. Шаг 2. Решаем задачи на Паскале. Задача 4
Лабораторная работа № 9. Шаг 2. Решаем задачи на Паскале. Задача 5
Лабораторная работа № 9. Шаг 2. Решаем задачи на Паскале. Задача 6
Лабораторная работа № 9. Шаг 3. Тест
Шаг 2. Решаем задачи на Паскале
Задача 6. Заполните матрицу размера n × m случайными числами из отрезка [1..100]. Найдите позицию минимального элемента среди максимальных элементов каждого ряда.
1. Дан шаблон программы решения задачи. Дополните его – составьте программу.
program matritca_6;
uses crt;
var
a: _________ ________ ________________
i, j, n, m, imax, jmax, iimin, jjmin, min :_____________
begin
randomize;
writeln ('Введите размер квадратной матрицы');
________________;
{получение матрицы случайных чисел}
for i:= __ to __ do
for j:= __ to __ do
_____________;
{вывод полученной матрицы}
for i:= 1 to n do
_________
for j:= 1 to m do
_____________
______________
______
{основная часть}
min:=101; {Подумайте почему}
for i:= 1 to n do
_________
{поиск позиции максимального элемента
в каждой строке матрицы}
imax:=___;
jmax:=___;
for j:= 1 to m do
if ________________ then
_________
imax := __;
jmax := __;
_______;
{поиск позиции минимального из максимальных элементов}
if ________________________ then
_________
min:=_________;
iimin := _______;
jjmin := _______;
_______;
_______;
writeln ______________;
______
2. Выполните программу. Если обнаружите ошибки, исправьте их.
3. Скриншот выполнения программы (текст программы должен быть виден):
| Скриншот |