Формирование строки из 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.



10.02.2015, 11:09 -
Категория: Статьи » Программирование » Pascal