Специальное прикладное программное обеспечение.
<span>var {секция описания переменных}
Number,Num1,Num2,Sum: integer;
begin{начало программы}
write('Введите двухзначное число: ');//Вывод строки на экран
read(Number); //переменная Number получает значение с клавиатуры
Num1 := Number div 10; //В Num1 целая часть от деления Number на 10
Num2 := Number mod 10; </span>//В Num2 остаток от деления Number на 10<span>
Sum := Num1 + Num2; //находим сумму Num1 и Num2
write('Сумма двух чисел — ',Sum);//вывод результата на экран
end. {конец программы}</span>
Readln(n);
a = n div 20;
writeln(a);
Для создания и редактирования графического изображения