Каппа и её слоники 0Имя входного файластандартный вводИмя выходного файластандартный...

0 голосов
23 просмотров

Каппа и её слоники 0Имя входного файластандартный вводИмя выходного файластандартный выводОграничение по времени2 секундыОграничение по памяти64 мегабайтаКаппа любит слоников. Дома у Каппы всегда много слоников. Но иногда слоники убегают. Куда и почему Каппа не знает :( . Нужно в очередной раз пересчитать всех слоников, чтобы знать сколько убежали.Формат входных данныхДано целое положительное число n - количество слоников (1 ≤ n ≤ 1000)Формат выходных данныхВыведите n строк вида “<номер> слоник” и в конце фразу “Нет больше слоников”Примерывходные данные выходные данные51 слоник2 слоник3 слоник4 слоник5 слоникНет больше слониковОтправить на проверкусрочно!!!


Информатика (16 баллов) | 23 просмотров
Дан 1 ответ
0 голосов

Ответ:

var  

 n, i: integer;

begin

 readln(n);

 for i := 0 to n do

  begin

   writelnformat('{0} слоник',i+1);

  end;

end.

Объяснение:


image
(105 баллов)