Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

Заполнить матрицу из 7 строк и 7 столбцов случайными числами в интервале [-10;10] и вывести на экран. Обнулить элементы отмеченный зеленым фоном и

10-11 класс

вывести полученную матрицу на экран.

Pol8172 08 мая 2014 г., 17:50:19 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Pakizat8452
08 мая 2014 г., 20:14:15 (9 лет назад)

Program Pr1;
uses crt;
var mas:array[1..7,1..7] of real;
var i,j,v:integer;
Begin
clrscr;
v:=7;
randomize;
for i:=1 to 7 do
for j:=1 to 7 do mas[i,j]:= random(20)-10;
for i:=1 to 7 do begin
for j:=v to 7 do mas[i,j]:=0;
v:=v-1;
end;
for i:=1 to 7 do
for j:=1 to 7 do begin
gotoxy(j,i);
write(mas[i,j]);
end;
end.

 

Ответить

Другие вопросы из категории

Что является стандартом сотовой связи?

1) WAP

2) MMS

3) SIM

4) SMS

5) GSM

ПОМОГИТЕЕ!!!1-что такое гиперссылка?Можно ли организовать гиперссылки в электронных таблицах?

2-Как использовать ячейку электронной таблицы в качестве кнопки для перехода в другое место?
3-Где хранится содержимое списка для формы ПОЛЕ СО СПИСКОМ?
4-Форма ПОЛЕ СО СПИСКОМ связана с ячейкой С8. Что появится в ячейке С8 при выборе второго ответа из списка? Заранее благодарю!

В таблице приведены запросы к поисковому серверу. Расположите номера запросов в порядке возрастания количества страниц, которые найдет поисковый сервер по

каждому запросу. Для обозначения логической операции «ИЛИ» в запросе используется символ |, а для логической операции «И» – &.
1. кролики

Читайте также

Заполнить матрицу из 8 строк и 5 столбцов случайными числами в интервале [10;10] и вывести ее на экран.

Удвоить все элементы матрицы и вывести ее на экран.
Найти минимальные и максимальные элементы в матрице, указать номера.
Просто матрица и удвоенная есть. Теперь нужно найти мин. и макс. значения

program ff;
uses crt;
const n=8;
m= 5;
var a:array [1..n, 1..m] of integer;
i,j:integer;
begin
writeln ('Матрица:');
for i:=1 to 8 do begin
for j:=1 to 5 do begin a[i,j]:=-10+random(21);
write(a[i,j]:4);
end;
writeln;
end;

for i:=1 to 8 do
for j:=1 to 5 do
a[i,j]:=a[i,j]*2;
writeln ('Удвоенная матрица:');
for i:=1 to 8 do begin
for j:=1 to 5 dowrite(a[i,j]:4);
writeln;
end;
end.

Заполнить матрицу из 8 строк и 5 столбцов случайными числами в интервале [-10;10] и вывести на ее на экран.

Удвоить все элементы матрицы и вывести ее на экран.

1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива

2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент

Помогите пожааалуйста,вообще нереально сделать(задачи зависят друг от друга) 1.заполнить массив из 100 элементов случайными числами.вывести на

экран с 20 по 50 в строку через пробел

2.для первыз десяти элементов найти среднее арифмитическое

3.вывести на экран только четные элементы с 1 по 10 элементы массива

4.найти сумму нечетныз значений с 20 по 50 элемент

5.найти количество элементов кратныз заданному числу,введёного с клавиатуры среди всез элементок линейного массива



Вы находитесь на странице вопроса "Заполнить матрицу из 7 строк и 7 столбцов случайными числами в интервале [-10;10] и вывести на экран. Обнулить элементы отмеченный зеленым фоном и", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.