Определите результат: var a, a1, a2 : integer; begin a :=

Определите итог: var a, a1, a2 : integer; begin a := 65; a1 := a div 10; a2 := a mod 10: writeln (39;В числе39;, a, 39;10-ов39;:14, a1, 39;единиц39;:14, a2); end.

Задать свой вопрос
1 ответ

// Расположив программный код в комфортном для восприятия виде лицезреем, что в 6 строке заместо

// ":" обязано быть ";"

 var

a, a1, a2 : integer; 

begin

a := 65;

a1 := a div 10; // обретаем количество десятков в числе 65 

a2 := a mod 10; // обретаем количество единиц в числе 65

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

end.

Ответ: Результатом выполнения программки будет вывод на экран строки "В числе65 десятков6 единиц5.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт