Урок 11. Задача 12.

Primary tabs

Submitted by Dennis80 on Wed, 05/11/2022 - 16:48

Получите первую и последнюю цифры числа 15 с помощью операций div и mod (решается без цикла)

var a, b : integer;

begin
  a := (15 div 10);
  b := (15 mod 10);
  writeln('First digit - ', a);
  writeln('Last digit - ', b);
  readln();
end.