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

Canko
Oct 24, 2020
var {секция описания переменных}
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. {конец программы}
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. {конец программы}
148
Смежные вопросы: