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