Помогите пожалуйста решить! ( паскаль )Паша (p) купил 10 яблок, а Коля k яблок. Известно,...

Question

Помогите пожалуйста решить! ( паскаль )
Паша (p) купил 10 яблок, а Коля k яблок.


Известно, что Коля купил больше яблок, чем Паша.


На сколько (x) яблок Коля купил больше, чем Паша?




Исходные данные: k


Результат: x


Пример 1: для исходных данных: 15 должен быть результат: 5


Пример 2: для исходных данных:10 должен быть результат: 0

Answer 1

Var k,x:integer;
Begin
    Writeln('Паша купил 10яблок');
    Write('Коля купил яблок: ');readln(k);
x:=k-10;
    Writeln('Коля купил на ',x,' больше яблок');
End.