81 : ) 1. а) запишите число 148, 8 тремя различными в форме с плавающей запятой. б) запишите число 568, 18 тремя различными в форме с плавающей запятой. 2. запишите числа в естественной форме: а) 128, 3*10^5; 1345*10^0; 0, 789e-4. б) 0, 001283*10^5; 13, 4501*10^0; 0, 923e-3. 3. проверьте, верно ли следующее равенство, в ответе укажите "да" или "нет": а) 33(индекс 4) = 21(индекс 7); б) 33(индекс 8) = 21(индекс 4

1а) 148.8 = 148.8·10⁰ = 1.488·10² = 1488·10⁻¹
1б) 568.18 = 56818·10⁻² = 5.6818·10² = 0.56818·10³
2а) 128.3·10⁵ = 12830000; 1345·10⁰ = 1245; 0.789Е-4 = 0.00007890
2б) 0.001283·10⁵ = 128.3; 13.4501·10⁰ = 13.4501; 0.923Е-3 = 0.000923
3а) 33₄ = 3·4+3 = 15₁₀; 21₇ = 2·7+1 = 15₁₀ ⇒ 33₄ = 21₇ ⇒ да
3б) 33₈ = 3·8+3 = 27₁₀; 21₄ = 2·4+1 = 9₁₀ ⇒ 33₈ ≠ 21₄ ⇒ нет

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

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

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

// 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