Нужна ваша помощь для создания программки в FP( free pascal) ,даю 100 балов за правильно сделанную работу
Приложения:
duracell107:
Я бы с радостью, но... Можно хотя бы краткую версию задания на русском языке?
Когда джентельмен начал расставлять уточек на полки по А штук на полку, у него одна уточка оказалась лишней. После етого он начал расставлять уточек по В штук на полку, но тогда у него не хватало одной уточки. Узнайте минимальное количество уточек. Программа на входе получает числа А и В, а выводит число, обозначающее количество уточек.
Это очень интересная задача. К сожалению, у меня нет рабочих идей на данный момент
Перебор тут вряд ли зайдёт (уверен, что есть ограничения по времени, ведь это олимпиадная задача). Я бы составил систему уравнений: x = a*p+1, x = b*q - 1, где x - искомое число; a, b - известные; p, q - некоторые неизвестные целые параметры. Из системы бы получил диофантово уравнение b*q - a*p = 2, которое решается с помощью расширенного алгоритма Евклида.
Ответы
Ответ дал:
1
Begin
var A:=ReadInteger();
var B:=ReadInteger();
var x1,x2: integer;
var x:integer;
x:=2;
while (x <= 2*10 ** 9) do
begin
if((x mod A=1) and (x mod B=B-1)) then
break;
x+=1;
end;
Writeln(x);
End.
Тогда пожалуйста,поможите,когда у меня будет дз по информатике
А я так поняла,что Бейсик- лёгкий и старый,или наоборот трудный?.
Вот только этот код во Free Pascal нельзя выполнить.
Бейсик или иной язык - это непринципиально для записи алгоритма. Но обучать проще всего, начиная с Паскаля. он именно для целей обучения и создавался.
Koljisto, можно писать так: var (A, B) := ReadInteger2;
Аа,ясно
а вы можете помочь мне с информатикой,когда будет дз ,вы сможите помочь?
Помочь или решить ДЗ за Вас? Разницу понимаете?
Приму к сведению
помочь,но не сейчас
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
3 года назад
3 года назад
8 лет назад