Составьте программу, формирующую строку, образованную любым количеством любого символа (количество и символ вводятся с клавиатуры). Помогите пожалуйста решить на Free Pascal
Составьте программу, формирующую строку, образованную любым количеством любого символа (количество и символ вводятся с клавиатуры).
Помогите пожалуйста решить на Free Pascal
Гость
Ответ(ы) на вопрос:
Гостьvar c:char; n,i:integer; s:string;
begin
write('Введите символ: ');
readln(c);
write('n = ');
readln(n);
s:='';
for i:=1 to n do s:=s+c;
writeln(s);
end.
Пример:
Введите символ: f
n = 5
fffff
Не нашли ответ?
Похожие вопросы