Задача 12 урок 11

Primary tabs

Submitted by Denisyndi on Fri, 11/12/2021 - 17:51

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

program programma12;
var i,a,b : integer;
begin
  i:=15;
  a:=i mod 2;
  b:=i div 3;
  writeln(i);
  write(a,' ',b);
  readln();
end.