Question

1)В поезде 17 вагонов, 10-17-купейные, остальные-плацкарт.Ввести № вагона.напечатать вид.
2)Ввести 2 числа. Напечатать их частное или сообщить, что на 0 делить нельзя

Answer 1

Задание №2.

Var a,b:real;
Begin
read (a,b);
if b>0 then writeln (a/b);
end.