Задание 2 Вариант 3 Самостоятельная работа 2 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Ниже вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:
2. Напишите программу для натурального N, выводящую на экран фразу «Мы нашли в лесу
По результатам выполнения программы заполните таблицу.
program s2_v3_2;
var
n: integer;
begin
write(taskn=task);
readln(n);
if n mod 10 = 1 then writeln(taskМы нашли в лесу task, n, task грибtask)
else if n mod 10 in [2..4] then writeln(taskМы нашли в лесу task, n, task грибаtask)
else writeln(taskМы нашли в лесу task, n, task грибовtask)
end.
Форма слова «гриб»
гриб
гриба
грибов
гриб
грибов
гриба