Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
alexcopes4
21.09.2021 03:42 •
Информатика
Решить по информатике(двухмерный массив). заполнить массив следующим образом: 12 24 120 2 14 110 1 13 109
Ответ:
bcfujd19
07.09.2020 22:52
Const
n = 10;
m = 12;
var
a: array[1..m, 1..n] of integer;
i, j: integer;
begin
for i := 1 to m do
begin
for j := 1 to n do
begin
a[i, j] := 12 * j - (i - 1);
write(a[i, j]:3, ' ');
end;
writeln;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
fdnk1
20.02.2020 19:10
Вася решил закодировать слово для пети, использовав следующий шифрования: 1 - а, 2 - б, 3 - в, …, 32 - ю, 33 - я, 34 - а, 35 - б, …, 66 - я, 67 - а, 68 - б, …,...
kiznijmaksimowbvhl
04.07.2022 07:21
Чем отличается сетевая ос от серверной ос? ?...
Kot12321
04.07.2022 07:21
Статья, набранная на компьютере, содержит 16 страниц, на каждой странице 32 строк, в каждой строке 25 символа. определите информационный объём статьи в одной из...
Dimon200315
25.05.2020 21:46
Массив в задан случайным образом а) подсчитать сумму элементов массива, меньших своего номера; б) подсчитать сумму элементов массива, стоящих на четных местах;...
BaLaWkA2004
12.04.2020 03:40
Процессор қандай қызмет атқарады...
mbilalov
17.05.2021 18:40
Чему будет равно r после выполнения программы: var a: integer; begin a: =25 if a mod 4=0 then write ( число кратно 4 ) else write ( число не кратно 4 ) end....
veder111oy2x71
17.05.2021 18:40
Представить число в виде полинома степени n по по соответствующему основанию: 703(8)...
xDVadiKSlivE
13.07.2020 20:57
Сколько места в памяти компьютера занимает текст состоящий из 100 символов (при восьмиразрядной кодировке стмвола...
Angelina862k
20.04.2020 07:09
Какой текст зашифрован с последовательности кодов 83 84 79 80 при использовании таблицы кодировки...
kolesnikova19971
13.02.2022 22:52
Переведите с ASCII на русский. 143 174 162 239 167 160 171 160 32 174 225 165 173 236 32 175 165 225 226 224 235 169 32 228 160 224 226 227 170 136 32 162 165 164...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
n = 10;
m = 12;
var
a: array[1..m, 1..n] of integer;
i, j: integer;
begin
for i := 1 to m do
begin
for j := 1 to n do
begin
a[i, j] := 12 * j - (i - 1);
write(a[i, j]:3, ' ');
end;
writeln;
end;
end.