Определите результат:
var
a, a1, a2 : integer;
begin
a := 65;
a1 := a div 10;
a2 := a mod 10:
writeln (В числе, a, десятков:14, a1, единиц:14, a2);
end.
В строке:
a2 := a mod 10:
надо у конце заменить ":" на ";":
a2 := a mod 10;
после этого программа выдаст строку:
В числе65 десятков6 единиц5
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
