Dim R As Single, p As Single, h As Single, V As Single
p = 3.1415926
R = InputBox("Введите радиус основания")
h = InputBox("Введите высоту цилинтра")
V = p * R ^ 2 * h
<span>MsgBox V</span>
Код программы во вложении.
Я думаю, что это папка, она же каталог
Дано:
к=260
N=64 => i=6
Решение
I=k*i
I=260*6=1560 бит=195 байт
// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString.ToWords.Reverse; s.Println
end.