Составьте программу запроса с клавиатуры 2-х чисел, нахождения частного от деления большего числа на меньшее и печати частного и большего числа.

Question

Ксенюша

19 октября, 12:09

+1

Ответы (1)

Знаешь ответ?

Игоряша · Answer 1

Var a, b:integer;

begin

read (a, b);

if a > b then writeln (a/b, a)

else writeln (b/a, b);

end.