помогите решить (паскаль)
Яблоки
Паша (p) купил 10 яблок, а Коля k яблок.
Известно, что Коля купил больше яблок, чем Паша.
На сколько (x) яблок Коля купил больше, чем Паша?
Исходные данные: k
Результат: x
Пример 1: для исходных данных: 15 должен быть результат: 5
Пример 2: для исходных данных:10 должен быть результат: 0
Яблоки
Паша (p) купил 10 яблок, а Коля k яблок.
Известно, что Коля купил больше яблок, чем Паша.
На сколько (x) яблок Коля купил больше, чем Паша?
Исходные данные: k
Результат: x
Пример 1: для исходных данных: 15 должен быть результат: 5
Пример 2: для исходных данных:10 должен быть результат: 0
Answers & Comments
Verified answer
Var k,x:integer;Begin
Writeln('Паша купил 10яблок');
Write('Коля купил яблок: ');readln(k);
x:=k-10;
Writeln('Коля купил на ',x,' больше яблок');
End.