Формирование строки из n одинаковых символов на Pascal

Формирование строки из n одинаковых символов...

var 
  c: char;
  s: string;
  n: integer;
begin
  n := 10;
  c := 'z';
  s := '';
  for var i:=1 to n do
    s += c;
  writeln(s);
end.



Просмотров: 2435
10.02.2015, 11:09 -

Категория: Статьи » Программирование » Pascal