Форум «Всё о Паскале» [Русская версия Invision Power Board]

Автор: Alan 13.12.2009 20:38

Приветствую всех!

Задача такова: ввести число N, после чего выполнить writeln N-нное количество раз.

Вопрос: как это написать в коде?

Автор: Игорь 13.12.2009 20:55

Так что ли?


program prog;
               
var n,i:integer;
           
begin
read(n);
for i:=1 to n do
 begin
   writeln;
  end;
end.

Автор: Гость 13.12.2009 21:05

Цитата

Первый ряд входного файла содержит число N — количество подсказок. Следующие N рядков содержат сами подсказки — номер направления и количество шагов. Числа разделены пробелами.

Это задание из олимпиадной задачи. Меня интересует, что именно прописать после ввода числа N, чтобы write выполнялось N раз.

Код

program prog;
var n,i:integer;
begin
write('Введите число N: ');
read(n);
//и вот здесь нужно что-то указать, что бы вводить номер направления и количество шагов N раз

Автор: Alan 13.12.2009 21:05

Цитата

Первый ряд входного файла содержит число N — количество подсказок. Следующие N рядков содержат сами подсказки — номер направления и количество шагов. Числа разделены пробелами.

Это задание из олимпиадной задачи. Меня интересует, что именно прописать после ввода числа N, чтобы write выполнялось N раз.

Код

program prog;
var n,i:integer;
begin
write('Введите число N: ');
read(n);
//и вот здесь нужно что-то указать, что бы вводить номер направления и количество шагов N раз

P.S. Случайно как Гость зашел

Автор: Игорь 13.12.2009 21:40

input будет файлом в котором в первой строке указано кол-во подсказок ,далее в n строках пойдут номер направления и кол-во шагов.


program prog;
var
inp:text;
n,a,b,i:integer;
begin
assign(inp,'input.txt');
reset(inp);
readln(inp,n);
writeln('Кол-во подсказок ',n);
for i:=1 to n do
 begin
   readln(inp,a,b);
   write('Номер направления: ',a);
   writeln(' Кол-во шагов: ',b);
  end;
close(inp);
end.

Программа должна работать.

Автор: Alan 13.12.2009 21:55

Значит, указывать количество подсказок и номера направления и количество шагов нужно сразу в input.txt?

Автор: Игорь 13.12.2009 22:09

Да, сразу т.е. заранее. В первой строке файла кол-во подсказок. Потом в каждой строке по два числа.

Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате