Напишите процедуру в Паскале, которая принимает параметр – натуральное число N – и...

Question

Напишите процедуру в Паскале, которая принимает параметр – натуральное число N – и выводит на экран линию из N символов '–'.

Answer 1

Program prog1;
var
n,null:integer;
begin
null:=1;
write('Введите число:');
readln(n);
while n>=null do
begin
null:=null+1;
write('-');
end;
readln;
end.

Comments

Спасибо! Но мне нужно процедура и, когда я выполняю эту программу, она выдает мне на одну черточку больше, чем число,которое я ввожу :(

---

Я поправил уже, сейчас попробую процедуру.

---

Скажите, а зачем мы там к null прибавляем 1?

---

Все, разобралась

---

Я написал процедуру, а он только 1 черточку выводит. Просто я процедуры плохо знаю, извините.

---

ничего. я вроде бы сама ее написала :)) еще раз спасибо вам!