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

Задача по Паскалю.Дан двумерный массив: a:array[1..5,1..5] of integer.Все нечётные столбцы сделать единичными,вывести ответ в виде таблицы.

5-9 класс

Bluyflower 28 окт. 2015 г., 7:50:05 (8 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Hgfdrjippfffjkopgdd0
28 окт. 2015 г., 9:54:42 (8 лет назад)

Var a:array[1..5,1..5] of integer; i,j:integer;
Begin
 randomize;
 for i:=1 to 5 do
   for j:=1 to 5 do a[i,j]:=random(9)+1;
 for j:=1 to 5 do
   for i:=1 to 5 do
     if (j mod 2)<>0 then a[i,j]:=1;
 for i:=1 to 5 do
   begin
    for j:=1 to 5 do write(a[i,j]:3);
    writeln;
   end;
End.

Ответить

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

Только если точно знаете пишите,прошу вас:З

Информатика)
Выделите подсистемы в следующих объектов,рассматриваемых в качестве систем:
а) автомобиль
б)компьютер
в)школа
г)армия
д) государство

Вам разрешено заменять в исходном слове одну букву на другую так, чтобы получившееся слово было существительным в именительном падеже.Менять местами буквы

запрещено.Запишите цепочки превращений следующих слов:бег-шаг;море-суша;миг-век;бант-коса;шар-куб;муха-слон.

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

Помогите пожалуйста решить правильно и подробно 2 задачи по информатике: 1.Исправьте неточности в описании двумерного массива: Var

A= array[1..n,1..m] of integer;

2. Вставьте пропущенные определения:

… … двумерных массивов каждая строка заключается в дополнительную пару круглых скобок:

const a:mas= ((2,3,1,0),
(1,9,1,3),
(3,5,7,0));

1. Указать ошибки в описании массива и пути их исправления: var a:array[real] of integer;

2. Определить,что распечатает следующая программа:
var a: array[1..5,1..5]of integer,i,j; integer;
begin
for i:=1 to 5 do begin
for j:=1 to 5 do begin
if i=5-j+1 then a[i,j]:=0
else a [i,j]:=0;
write(a[i,j]:2);
end;
writeln;
end; end.
3. Дан линейный массив a [l..n], содержащий целые числа. Вычислить сумму чисел делящихся одновременно на 5 и на 3 и распечатать номера таких чисел
4.Дан линейный массив a [l..n], содержащий целые числа. Преобразовать элементы массива по следующему правилу : если элемент положительный,то заменить его на 1, а если отрицательный - возвести в квадрат

Написать програму для Паскаля :Дан линейный массив,содержащий положительные и отрицательные целые числа ,n=10.Создать новый массив, в котором

содержатся только положительные элементы из исходного масива ,упорядочить этот новый массив по возрастанию.

Задача на паскале Задан массив А размерности N случайным образом.

Нужно сформировать новый массив по следующему правилу:
все чётные элементы разделить на 2, все нечётные оставить без изменения

1. Дан двухмерный массив A(n,m).

Найти произведение отрицательных четных элементов второго столбца массива.

2. Дан двухмерный массив m*n.
Получите одномерный массив b, элементы которого равны min элементам по строкам.



Вы находитесь на странице вопроса "Задача по Паскалю.Дан двумерный массив: a:array[1..5,1..5] of integer.Все нечётные столбцы сделать единичными,вывести ответ в виде таблицы.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.