Определить, превышает ли сумма остатков от деления на 11 двух чисел число 11

@xersin · Регистрация: 29.11.2014

Студворк — интернет-сервис помощи студентам

Здравствуйте)
Помогите решить задачку на Паскале)
Я гуманитарий и все этим сказано)

Ввести два числа a и b.Определить, превышает ли сумма остатков от деления на 11 этих чисел число 11.Если превышает,то увеличить их оба на 5.

Заранее благодарю)

@JokeR.BY · 29.11.2014, 21:16

Pascal

const
    q = 11;
var
    a, b : Integer;
begin
    Write('a, b: '); ReadLn(a, b);
    if (((a mod q) + (b mod q)) > q) then
    begin
        Inc(a, 5);
        Inc(b, 5);
    end;
    WriteLn('a=', a, ', b=', b);
end.

@xersin 0 / 0 / 0 Регистрация: 29.11.2014 Сообщений: 12
		1
	Определить, превышает ли сумма остатков от деления на 11 двух чисел число 11 29.11.2014, 20:46. Показов 2052. Ответов 1 Метки нет (Все метки) Здравствуйте) Помогите решить задачку на Паскале) Я гуманитарий и все этим сказано) Ввести два числа a и b.Определить, превышает ли сумма остатков от деления на 11 этих чисел число 11.Если превышает,то увеличить их оба на 5. Заранее благодарю) 0

Опции темы

Определить, превышает ли сумма остатков от деления на 11 двух чисел число 11

Решение