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.