Есть ответ 👍

Составить программу, которая бы выводила введенное пользователем нецелое число, обозначающее длину в метрах в виде целого количества метров, сантиметров, миллиметров и микрометров (при необходимости).
например: 1,234 м – это 1234 мм, 1,57 м – это 157 см, 0,00056 м – это 560 мкм

104
271
Посмотреть ответы 2

Ответы на вопрос:


pascalabc.net

begin

  var l : = readreal('длина в м: ');

  if frac(l) = 0 then

    println(l, 'м')

  else

  begin

    l *= 100;

    if frac(l) = 0 then

      println(l, 'см')

    else

    begin

      l *= 10;

      if frac(l) = 0 then

        println(l, 'мм')

      else

      begin

        l *= 1000;

        println(round(l,0), 'мкм')

      end

    end

  end  

end.


Операциялық жүйені жазудың екі жүйесі бар — тұрақты сақтауыш құрылғыға барлық жүйені жазу және қатқыл дискіден операциялық жүйенің қалған бөлігінің тек жүктеу программаларын ғана жазу. Мекемеде пайдаланылатын шағын компьютерлер, әдеттегідей, MS-DOS немесе ең соңғы OS/2 операциялық жүйесін пайдаланады.

Объяснение:

Популярно: Информатика