Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
lenalatka
06.02.2021 19:15 •
Информатика
Паскаль с клавиатуры вводится 2 числа первое-количество столбцов, второе-количество строк. построить "таблицу" (если например ввели 2; 3) таблица такая \1\1\ \1\1\ \1\1\
Ответ:
DariaBlack777
05.10.2020 22:09
Var
M,N,i:integer;
Begin
ReadLn(N,M);
For M:= 1 to M do
Begin
For i:= 1 to N do
Write('\1');
WriteLn('\')
End
End.
Пример:
13 7
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
0,0
(0 оценок)
Популярные вопросы: Информатика
aaaddd1988
05.05.2023 12:27
Что такое тестирование модели?...
Дахич1
11.12.2020 23:49
8. владелец бизнеса хочет оценить эффективность ежедневных процедур резервного копирования в четырех филиалах. подходящий критерий для измерения это а) легкость резервного копирования...
fara2003onozog7w
11.12.2020 23:49
11. каталог файлов является эффективным инструментом, так как а) является широко признанным форматом б) показывает все папки на каждом уровне в) имеет четкие навигационные пути,...
ДарьяКаракал
08.11.2020 02:24
Написать программу нахождения суммы нечётных цифр в натуральном числе. pascal...
sonka1001p0arxp
08.11.2020 02:24
Программа организация доступа к аппаратной части компьютера(7 букв)...
Elay11
14.02.2020 19:25
Какие фигуры можно создать с инструмента...
ИринаЭлина11
10.02.2022 12:38
Пронумеруйте порядок построения фигуры...
145milana
17.03.2023 21:52
На доске нарисованы точки. Пусть А = Внутри круга А находятся 190 точек и В = Внутри круга В находятся 230 точек . Всего на доске нарисовано 500 точек. Внутри обоих кругов одновременно...
erik09hfilya
28.01.2022 18:12
. На территории колледжа был замечен правонарушитель. Имеются свидетель-ские показания. Первый свидетель сообщил, что преступник брюнет с усами. Второй свидетель сообщил, что...
arykovevgeny
14.07.2020 15:01
В соревнованиях по гимнастике участвуют Алла, Валя, Сима и Даша. Болельщики высказали предположения о возможных победителях: 1) Сима будет первой, Валя — второй; 2) Сима будет...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
M,N,i:integer;
Begin
ReadLn(N,M);
For M:= 1 to M do
Begin
For i:= 1 to N do
Write('\1');
WriteLn('\')
End
End.
Пример:
13 7
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\
\1\1\1\1\1\1\1\1\1\1\1\1\1\