Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
elinaaak
23.01.2023 10:01 •
Информатика
Напишите программу, которая строит "квадрат" из знаков '*' заданного размера. используйте процедуру. на языке pascal. , !
Показать ответ
Ответ:
viktoria388
24.09.2020 01:54
Цикл в цикле:
var
a, i, j: integer;
begin
write('Сторона квадрата: ');
readln(a);
for i := 1 to a do
begin
for j := 1 to a do write('*');
writeln;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
NezNeika
24.06.2020 01:05
Найти задачу, которая решается с использованием цикла с предусловием, написать для нее программу....
Лера1369999
28.10.2022 23:44
створіть проект, у якому вводяться значення елементів табличної величини з різних дійсних чисел у багарядковому текстовому полі , кількість яких не перевищує 50, визначається...
kurtenokalina2
09.02.2021 11:16
Информатика 6 класс 146 страница 6 задание ...
Davidovaliza
15.03.2023 13:41
Написать программу в паскале. даны два числа.меньшее из них замените полусуммой этих чисел, а большее - их произведением. составить блок-схему....
CailiVinchisiter
15.03.2023 13:41
Определите обьем ведео памяти компьютера который необходим для реализации графического режима манитора high colore разрешающий точек и палитрой из 65536 цветов...
Асамия
09.11.2022 13:48
1.нужно составить программу перевода градусов в интервале 15-30 шкалы цельсия на градусы фаренгейта. формула преобразования f=c*1.8+32, здесь с – градусы цельсия; f –...
nastyakostikov1
15.12.2020 13:43
Дано трехзначное число. в нем зачеркнули первую слева цифру и приписали ее справа. вывести полученное число. нужно написать на c#...
stebone
01.07.2021 16:59
Ученику необходимо умножить 58 на 67. Он перемножив отдельно десятки и получил 3000, а затем перемножив отдельно единицы и получил 56...
рррррррх
01.07.2021 16:59
Что можно сказать о множители, если их произведение равно 0? Приведите примеры...
dianacm789
01.07.2021 16:59
Назовите числовой коэффициент в выражении: 1) 2аЬс; 2) 4x • 3y • 2z; 3) m • 5n • p....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
a, i, j: integer;
begin
write('Сторона квадрата: ');
readln(a);
for i := 1 to a do
begin
for j := 1 to a do write('*');
writeln;
end;
end.