Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Malvina1903
23.05.2023 12:46 •
Информатика
Скласти блок-схему і програмний код алгоритму формування такої матриці: 111111 000000 111111 000000 111111 000000 будь-
Ответ:
alinacotikmeow
01.10.2020 22:52
Const
n = 6;
var
i, j: integer;
a: array[1..n, 1..n] of integer;
begin
for i := 1 to n do
begin
for j := 1 to n do
begin
if i mod 2=0 then a[i, j] := 0
else a[i, j] := 1;
write(a[i, j])
end;
writeln;
end;
end.
Тестовое решение:
111111
000000
111111
000000
111111
000000
0,0
(0 оценок)
Популярные вопросы: Информатика
Гаргульчик
17.09.2020 16:57
Постройте дерево Хаффмана для любых двух фраз из списка ниже: 1) Не руби дрова на траве двора. 2) Прецедент с претендентом. 3) Течёт речка, печёт печка. Покажите...
alan001199
15.01.2021 18:49
Сколько секунд потребуется, чтобы скачать файл размером 1500 мб со скоростью 80 мбит/с? (в ответе должно быть только число)...
g89546546354245
02.02.2022 17:13
Сколько байтов составляют 1/2 килобайта.сколько битов содержится в1/2 килобайта....
angelina2410
26.04.2023 09:48
Цель работы: изучение методов разработки алгоритмов обработки многомерных массивов данных и их запись в виде блок-схем. : найти сумму элементов квадратной матрицы...
NastenaNastena2005
26.04.2023 09:48
Штирлицу удалось похитить пароль от сейфа с секретными материалами — группенфюрер мюллер неосторожно написал его на бумаге и, порвав на несколько частей, выбросил...
787363
03.10.2020 23:43
Какой формат имеет команда ветвления? какие действия исполнителя она определяет?...
золотесерце
25.03.2023 20:57
Актуальность темы компьютерные объекты- введение-компьютерные объекты заключение-темы компьютерные объекты(типа что ты узнал нового из этой темы и что тебе понравилось)...
olliu56
13.06.2022 17:33
Сколько единиц а двоичной записи шестнадцатеричного числа Е1F0...
Amfitom1ne
16.01.2020 11:02
Как код элемента страницы? Плз нормально ответ дайте...
AvdAda24
15.08.2022 01:22
КАКОЙ ТЕЛЕФОН ВЫБРАТЬ ЧТОБЫ ОН СТОИЛ В ПРЕДЕЛАХ ПЯТИ ТЫСЯЧ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
n = 6;
var
i, j: integer;
a: array[1..n, 1..n] of integer;
begin
for i := 1 to n do
begin
for j := 1 to n do
begin
if i mod 2=0 then a[i, j] := 0
else a[i, j] := 1;
write(a[i, j])
end;
writeln;
end;
end.
Тестовое решение:
111111
000000
111111
000000
111111
000000