Прокомментируйте каждую строку программы:
var {секция описания переменных}
Number,Num1,Num2,Sum: integer;
begin{начало программы}
write('Введите двухзначное число: ');
read(Number);
Num1 := Number div 10;
Num2 := Number mod 10;
Sum := Num1 + Num2;
write('Сумма двух чисел — ',Sum);
end. {конец программы}
var {секция описания переменных}
Number,Num1,Num2,Sum: integer;
begin{начало программы}
write('Введите двухзначное число: ');
read(Number);
Num1 := Number div 10;
Num2 := Number mod 10;
Sum := Num1 + Num2;
write('Сумма двух чисел — ',Sum);
end. {конец программы}
Answers & Comments
Number,Num1,Num2,Sum: integer;
begin{начало программы}
write('Введите двухзначное число: ');//Вывод строки на экран
read(Number); //переменная Number получает значение с клавиатуры
Num1 := Number div 10; //В Num1 целая часть от деления Number на 10
Num2 := Number mod 10; //В Num2 остаток от деления Number на 10
Sum := Num1 + Num2; //находим сумму Num1 и Num2
write('Сумма двух чисел — ',Sum);//вывод результата на экран
end. {конец программы}