Даны целые числа a,b,n требуется найти количество целых чисел x таких что 0<=x<=n и число...

0 голосов
27 просмотров

Даны целые числа a,b,n требуется найти количество целых чисел x таких что 0<=x<=n и число a*x при делении на n дает остаток b паскаль<br> пожалуйста помогите скоро олимпиада а я начал почти с нуля ни могу понять как решить


Информатика (46 баллов) | 27 просмотров
Дан 1 ответ
0 голосов

Учи python он проще и легче pascal

program n_1:
var i,a,b,n,s:integer;
begin
s:=0;
readln(a);
readln(b);
readln(n);
for i:=0 to n do
begin
if ((a*i) mod n) = b then s:=s+1
end;
writeln(s);
end.

вроде должно работать

(402 баллов)
0

спасибо щяс проверю я просто на алимпиаду там не измениш