Составьте программу, выводящую ** экран символ * 20 раз

Question

Составьте программу, выводящую на экран символ * 20 раз

Answer 1

// PascalABC.NET 3.1, сборка 1214 от 09.04.2016
begin
  Write('*'*20)
end.

Comments

А этот код еще короче и не требует ничего знать о циклах)))

---

Это точно))) Жалко, что наша школа не скоро придет такой культуре программирования. Но подвижки уже наблюдаются. И это радует!

---

Не обязательно сразу использовать все, что дает PascalABC.Net 3.1 - можно для начала взять только простейшие удобства: объявление var в блоках и в заголовке циклов, процедуру Print для вывода с пробелом, возможности Write выводить любые объекты целиком, возможность преобразовать число в строку путем конкатенации ( 'число в '+2*2+' тексте') и "размножение" строки путем умножения её на множитель.

---

Да и работа со случайными числами существенно облегчает код и восприятие кода

---

Да, но это требует уже дополнительного изучения.

Answer 2

Задание на умение использовать циклы. Так как мы знаем, сколько раз надо выполнить операцию, то разумнее использовать цикл for:

var i:integer;
begin
  for i:=1 to 20 do write('*');
end.

Вот и весь код.