Паскаль. Катя купила в магазине N груш. Сможет ли она поделить

Решение на C. Переведи на синтаксис паскаля :)

include lt;stdio.hgt;

int pearCount;

int friendsCount;

int main(int argc, const char * argv[])

printf("Количество груш: ");

scanf("%i", amp;pearCount);

printf("Количество подруг: ");

scanf("%i", amp;friendsCount);

if (pearCount % friendsCount != 0)

printf("Количество груш '%i' Количество подруг '%i': нет\n", pearCount, friendsCount);

else

printf("Количество груш '%i' Количество подруг '%i': да\n", pearCount, friendsCount);

return 0;