#include using namespace std; int main() { int a,b; cin >> a >> b; for (int i = 1; i <= a; i++)<br> { if (a%i == 0) { if (i%b == 0) { cout << i << ' ';<br> } } } system("pause"); }
Это разве Pascal?
нет, но вы не сказали что на паскале
ну ладно щас сделаю на паскале
Спасибо огромное.Буду очень благодарен
Var a,b:integer; i:integer; begin readln(a,b); for i:=1 to a do begin if(a mod i = 0) then begin if(i mod b = 0) then write(i,' '); end; end; end.
Хрень какая-то....она не работает
Точно нечего не забыл?