Ввести слово и число раз (Ввод; паскаль, 3). Вывести это слово так:
паскаль
паскаль паскаль
паскаль паскаль паскаль
Ответ
Автор - alca132
Если задание недопонял, пиши и объясни. Перепишу
var text1:string; count,i:integer; begin write('Введите слово: '); readln(text1); write('Сколько раз мне его показать на экране? '); readln(count); for i:=1 to count do begin write(text1, ' ') end; end.