Procedure PRINTBARS (B : INTEGER); Var i : INTEGER;
Begin
For i := 1 to B do
write('-')
End;
що отримємо в результаті використання процедури​

Популярно: Информатика

• 

  КнОпОськА8965

  06.03.2023 20:15
  В языке запросов поискового сервера для обозначения логической операции...
• 

  adilukanova

  04.04.2022 03:19
  В HTML, чем отличается div от span?...
• 

  obelardo1

  14.04.2020 14:52
  Информатика 8 класс. написать решение в программе abc одна компания...
• 

  IraIvan

  13.09.2021 07:49
  В треугольнике QBR медианы QM и BT пересекаются под прямым углом и...
• 

  culi42

  08.03.2022 00:06
  1. Реши задачу. а) В наборе из 32 чертёжных карандашей 2 части твёрдые...
• 

  zarina20178

  28.10.2022 23:56
  Плавающее тело вытесняет бензин объёмом 150 см³. Определи, какой объём...
• 

  Mauntians

  05.06.2021 04:49
  A) Напишите выражение для нахождения площади поверхности куба, используя...
• 

  Попова1234

  20.06.2023 14:57
  1. Пдействие состоит из 4 картин. Напишите название каждой картины...
• 

  LeylaAllesgerova

  11.06.2020 03:29
  Сколько существует четырёхзначных чисел в шестнадцатеричной системе...
• 

  TheVladChannel

  16.08.2022 15:40
  В треугольнике KMN с углом MKN =58° высоты ME и KF пересекаются в точке...