Помогите решить (паскаль)

Яблоки

Паша (p) купил 10 яблок, а Коля k яблок.

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

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

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

Результат: x

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

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

Question

Информатика

Иаким

13 июля, 22:04

Помогите решить (паскаль)

Яблоки

Паша (p) купил 10 яблок, а Коля k яблок.

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

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

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

Результат: x

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

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

+3

Ответы (1)

Знаете ответ на вопрос?

Мариамночка · Answer 1

Var k, x:integer;

Begin

Writeln ('Паша купил 10 яблок') ;

Write ('Коля купил яблок: ') ; readln (k) ;

x:=k-10;

Writeln ('Коля купил на ', x,' больше яблок') ;

End.