Определите результат:

var

a, a1, a2 : integer;

begin

a : = 65;

a1 : = a div 10;

a2 : = a mod 10:

writeln ('В числе', a, 'десятков':14, a1, 'единиц':14, a2) ;

end.

Question

Илья

30 марта, 02:01

+3

Ответы (1)

Знаете ответ на вопрос?

Афиноген · Answer 1

В строке:

a2 : = a mod 10:

надо у конце заменить ":" на "; ":

a2 : = a mod 10;

после этого программа выдаст строку:

В числе65 десятков6 единиц5

Определите результат:vara, a1, a2 : integer;begina : = 65;a1 : = a div 10;a2 : = a mod 10:writeln ('В числе', a, 'десятков':14, a1, 'единиц':14, a2) ;end.