Cam asa e ideea mea:
mai intai faci o functie CIFRA care primeste prima cifra a unui numar
apoi for i:=2 to n do
if a[i-1] mod 10cifra(a[i]) then nr:=nr+1;
pe nr il vei tipari in fisier.
Nu am invatat decat if si while
anonim_4396 întreabă: