tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вдвумерном массиве вывести шахматную
Вдвумерном массиве вывести шахматную доску, известно что первая клетка - белая. пользователь может ввести размер доски, это число n. w-белая, b-черная. pascal. например n=3: wbw bwb wbw , , важно.
агроэШкольник2281
3 09.09.2019 21:00
1
Ответы
amankeldievan
07.10.2020 04:03
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
var a:=MatrGen(n,n,(i,j)->(i+j).IsEven?'W':'B');
a.Println(1)
end.
Пример
n= 8
WBWBWBWB
BWBWBWBW
WBWBWBWB
BWBWBWBW
WBWBWBWB
BWBWBWBW
WBWBWBWB
BWBWBWBW
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
maratkhan0311
27.09.2019 23:50
1. представьте информацию в структурном виде так, чтобы ее было легче воспринимать: «озеро байкал находится на юг восточной сибири. длина озера 636 км, ширина 80 км, площадь...
magauiyaa
27.09.2019 23:40
Переведите чило в шестиричной сс в десятичную 12345...
pahalovrzx
27.09.2019 23:40
Задан динамический двумерный массив. найти сумму четырех случайных элементов массива и произведение 9 случайных элементов массива.результат вывести на экран. язык реализации...
prizrak6571
13.09.2019 04:00
Водномерном массиве поменять местами максимальные и минимальные элементы (в паскале)...
lolkekcheburek15
13.09.2019 04:00
1)почему возникла необходимость создания новой области науки -информатики? 2) каков смысл величины байта? 3) что такое модальность в информатике?...
ponyni
06.10.2019 18:53
дан массив, состоящий из целых чисел. напишите программу, которая определяет, есть ли в массиве пара соседних элементов с одинаковыми знаками. входные данные сначала задано...
Асурка
06.10.2019 18:53
Организуйте вывод памятки для начинающего программиста. вам нужно написать программу так, чтобы расчет значения в последней строке выполнялся непосредственно перед ее...
nastyakot11
06.10.2019 18:47
Запишите развёрнутую форму числа: 54254,61 (число в семиричной системе)...
вадим887
27.04.2021 23:58
Информатика 7 клас Python Складіть проєкт для малювання чотирьох квадратів, розміщених поруч. Довжина сторони першого з них дорівнює А кроків, а довжина сторони кожного...
12345678910446638
28.04.2021 00:00
Сделайте . (Информатика, phyton)...
Популярные вопросы
Учёный – химик открыл неизвестный ранее химический элемент, который...
1
Напиши развернутый ответ (100 слов) на вопрос: в чем польза минеральной...
2
На каком участке цепи, в которой работают электролампа и звонок, надо...
1
с эссе , На 100 слов Берілген тақырыптардың бірін таңдап, эссе жазыңыз....
1
8класс. III четверть c) to explainb) to informc) quizI. Найдите синонимы....
3
Lesson 5 Jason s family MordWho is who in Jason s family? Read the...
3
Решите неравенство : 7( х-12) меньше или равно 2х это соч ...
1
А)7x-12,42=5x-3,44б)(0,5x-5,12)•0,44=0,6952...
3
Кестедегы бос орындарды толыктырып тызым жазыныз...
1
7. В координатной плоскости отметьте точки А(-2; 3), В(3; 2), С(-1;...
3
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
var a:=MatrGen(n,n,(i,j)->(i+j).IsEven?'W':'B');
a.Println(1)
end.
Пример
n= 8
WBWBWBWB
BWBWBWBW
WBWBWBWB
BWBWBWBW
WBWBWBWB
BWBWBWBW
WBWBWBWB
BWBWBWBW