Необходимо в lazarus составить программу, которая будет выводить символы верхнего и нижнего регистра кириллицы. после самого последнего слова begin нужно что-то поменять, чтобы всё работало

Видать расписать как для робота схему поведения
чем подробней тем лучше, например

зайти в кладовку
взять веник
взять совок
выйти из кладовки
пройти в помещение, которое необходимо подмести
движениями слева направо сметать мусор в сторону (многократно, пока все помещение не будет подметено)
собрать мусор веником в одну кучку
кучку мусора веником замести на совок
подойти к мусорному ведру
высыпать мусор из совка в мусорное ведро
пройти в кладовку и поставить на место веник и совок

как то так.. степень подробности выбирайте сами

// F#
// 1.
[<EntryPoint>]
let main argv =
    let mutable x = System.Console.ReadLine() |> System.Double.Parse
    if x > 0.0
        then x <- x+5.0
    printf "%f" x
    System.Console.ReadKey true |> ignore
    0
// 2.
// F#
[<EntryPoint>]
let main argv =
    let mutable x = System.Console.ReadLine() |> System.Double.Parse
    let mutable y = System.Console.ReadLine() |> System.Double.Parse
    if x > y
        then x <- x*4.0; y <- y+4.0;
        else y <- y*4.0; x <- x+4.0;
    printf "x: %f\ny: %f" x y
    System.Console.ReadKey true |> ignore
    0