1. Информатика
  2. Напишите программу, которая строит

Напишите программу, которая строит "квадрат" из знаков '*' заданного размера. используйте процедуру. (паскаль авс). заранее )

Marymol2005 Marymol2005    3   05.07.2019 10:20    14

Ответы
Анастасия8383 Анастасия8383  28.07.2020 21:58
Var 
n,i,j:longint;
procedure qwer(a:longint;);
begin 
 for j:=1 to a do write('*');
 writeln;
end;
begin
 readln(n);
 for i:=1 to n do qwer(n);
  end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
HELP111111111111q HELP111111111111q  18.02.2020 16:46
Составте программу,которая запрашивает время в часах (0,3,6,9,12,15,18,21,24) и рисует часы с показаниями часовой стрелки...
plotnikdias plotnikdias  18.02.2020 16:50
Решите проблему на языке. паскаль​...
Sashok1252535 Sashok1252535  11.04.2020 23:05
Ютуб всё о нём по информатике...
Valeria12351778 Valeria12351778  11.04.2020 23:05
1.Можно ли считать, что линейный список — это частный случай дерева? ответ обоснуйте 2.Какими свойствами должно обладать дерево поиска?...
пипиша пипиша  11.04.2020 23:05
Информатика Задание в exel...
auutumn1 auutumn1  11.04.2020 23:05
Найти количество элементов массива, значения которых меньше числа 23 и кратны 5....
Facebook1898909 Facebook1898909  11.04.2020 23:04
Визначте чому дорівнює F:=1;A=3; For i:= 1 To 3 F: = F*A Next хелп дуже потрібнооо❤️...
8976Феня 8976Феня  11.04.2020 23:03
Файл раз­мі­ром 126 Мбайт передається через деяке з єднання за 3 хвилини. Визнач розмір файлу (в Мбайт), який можна передати через це ж з єднання за 420 се­кунд....
дождолей дождолей  25.11.2021 20:08
Составьте программу, которая заполняет массив а [1..10] случайными целыми числами в диапазоне от 1 до 10, затем преобразовывает его, увеличивая все элементы с нечетными значениями...
Кларесия10 Кларесия10  25.11.2021 20:09
умные люди! Выписать в тетрадь сочетания горячих клавиш, позволяющих: 1. копировать 2. вставлять фрагмент текста 3. вырезать текст 4. выполнять поиск текстового фрагмента 5. выделять...

Популярные вопросы