Составьте разветвляющуюся программу в паскале: на автобазе стоят весы. если машина легче 15 тонн, то недогруз.

Question

Информатика: Составьте разветвляющуюся программу в паскале: на автобазе стоят весы. если машина легче 15 тонн, то недогруз. если больше 30 тонн, то перегруз. иначе норма.

Efimenko34 · Answer

Program asdas;Uses crt;var ves:real; //real- ибо нужно допустить вес в 3,5 тонны как пример beginreadln (ves);if ves 15then writeln ( недогруз ) else if ves 30         then writeln ( норма );end....

Составьте разветвляющуюся программу в паскале: на автобазе стоят весы. если машина легче 15 тонн, то недогруз. если больше 30 тонн, то перегруз. иначе норма.

Популярные вопросы