Помогите решить (паскаль)ЯблокиПаша (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.