Посчитать количество банок краски для покраски бака (КуМир)

Тема: 
Линейные алгоритмы

Требуется найти, сколько банок краски потребуется, чтобы покрасить цилиндрический бак с внешней стороны.

Бак состоит из собственно цилиндра и двух кругов (дно и крышка). Площадь цилинра находится по формуле s = π * d * h, где d - диаметр, h - высота цилиндра. Площадь круга s = π * d2 / 4.

Чтобы найти, сколько банок краски потребуется, надо разделить площадь бака на количество квадратных метров, которые можно окрасить одной банкой. При этом может получиться дробное число, но поскольку количество банок долно быть целым, то его надо округлить до целого в большую сторону.

алг покрасить_бак
нач
  вещ d, h, circle, cylinder, tank, qty
  цел s
  вывод "Диаметр бака: "; ввод d
  вывод "Высота бака: "; ввод h
  вывод "Сколько метров красит одна банка: "; ввод s
  circle := 3.14 * d**2 / 4
  cylinder := 3.14 * d * h
  tank := circle * 2 + cylinder
  qty := tank / s
  вывод "Потребуется " + цел_в_лит(int(qty) + 1) + " банок краски"
кон

Работа программы:

Диаметр бака: 5
Высота бака: 10
Сколько метров красит одна банка: 10
Потребуется 20 банок краски

В среде программирования КуМир возведение в степень обозначается двумя знаками умножения (**). Функция цел_в_лит(x) переводит целое число в строку. В данной задачи она используется, чтобы можно было выполнить конкатенацию строк. В алгоритмическом языке при конкатенация строки и числа, автоматического преобразования последнего в строку не происходит.