Решение задачи №21 из главы 3

Задача 21 из главы 3

Напишите программу с тремя переменными целого типа, первым двум присвойте значения, а третьей переменной их произведение за вычетом их суммы (например, для значений 5 и 2 должно получиться выражение эквивалентное: 5∗2−(5+2)). Выведете значение третей переменной на экран.

var v, //  для хранения первого целочисленного литерала
    p,  //  для хранения второго целочисленного литерала
    s :integer; // s -переменная для хранения ответа
begin//открываем операторные скобки
    v:=5;//инициализация переменной v
    p:=10;//инициализация переменной p
    s:=v*p-(v + p);
    write('Znachenie tretiei peremennoi ravno',' ', s);{выводим строковые литералы
    и переменную }
    readln();//удерживаем консоль
end.//закрываем операторные скобки