Задать вопрос
12 июня, 09:59

Составьте разветвляющуюся программу в паскале:

На автобазе стоят весы. Если машина легче 15 тонн, то недогруз. Если больше 30 тонн, то перегруз. Иначе норма.

+3
Ответы (1)
  1. 12 июня, 13:11
    0
    Program asdas;

    Uses crt;

    var ves:real; / / real - ибо нужно допустить вес в 3,5 тонны как пример

    begin

    readln (ves);

    if ves<15

    then writeln ('недогруз')

    else if ves>30

    then writeln ('норма');

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Составьте разветвляющуюся программу в паскале: На автобазе стоят весы. Если машина легче 15 тонн, то недогруз. Если больше 30 тонн, то ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы
Помоги с ответом
1. Световая волна какого цвета имеет максимальную частоту? 1) красного 2) оранжевого 3) фиолетового 4) синего 2. Расположите в порядке возрастания частоты пучки света разного цвета А) оранжевый Б) синий В) желтый Г) зеленый 3.
Нет ответа
Составить пять предложений с причастным оборотом и пять с деепричастным оборотом.
Нет ответа
Ответьте на вопросы по поэме Н. А. Некрасова "Кому на Руси жить хорошо" "Пролог" 1. В чем суть спора между мужиками? Почему они отправились в путь в такое ответственно время? 2. Какую клятву дают они в конце пролога? 3.
Нет ответа
3) Площадь треугольника ЕОТ равна 24 см в квадрате. Треугольник АВС подобен треугольнику МКТ и его площадь равна 6 см квадратных. НАйдите комэффициент подобия и сторону ОТ треугольника ЕОТ, если ВС=8 см и угол А=Углу Е
Нет ответа
Выпишите имена ученых которые работали в Александрийском музее!
Нет ответа