Каппа и её слоники
0
Имя входного файла
стандартный ввод
Имя выходного файла
стандартный вывод
Ограничение по времени
2 секунды
Ограничение по памяти
64 мегабайта
Каппа любит слоников. Дома у Каппы всегда много слоников. Но иногда слоники убегают. Куда и почему Каппа не знает :( . Нужно в очередной раз пересчитать всех слоников, чтобы знать сколько убежали.
Формат входных данных
Дано целое положительное число n - количество слоников (1 ≤ n ≤ 1000)
Формат выходных данных
Выведите n строк вида “<номер> слоник” и в конце фразу “Нет больше слоников”
Примеры
входные данные выходные данные
5
1 слоник
2 слоник
3 слоник
4 слоник
5 слоник
Нет больше слоников
Отправить на проверку
срочно!!!
Answers & Comments
Ответ:
var
n, i: integer;
begin
readln(n);
for i := 0 to n do
begin
writelnformat('{0} слоник',i+1);
end;
end.
Объяснение: