COCI-07 (2007) - Γύρος #5 - 2 (Pascal)

View as PDF

Submit solution

Points: 15 (partial)
Time limit: 1.0s
Memory limit: 32M

Author:
Problem type
Allowed languages
C, C++, Java, Pascal, Python
Pascal

Ο μικρός Frane είναι ήδη στη δεκάτη δημοτικού, αλλά εξακολουθεί να παλεύει με την γλώσσα Pascal στο μάθημα των υπολογιστών. Για την εργασία για το σπίτι ο δάσκαλός του έγραψε το ακόλουθο πρόγραμμα στο τετράδιό του και πρέπει να προσδιορίσει την έξοδο, δεδομένου του ακέραιου N.

readln(N);
counter := 0;
for i := N-1 downto 1 do begin
 counter := counter + 1;
 if N mod i = 0 then break;
end;
writeln(counter);

Γράψτε ένα πρόγραμμα που θα λύνει το πρόβλημα του Frane.

Είσοδος

Η πρώτη γραμμή εισόδου περιέχει τον ακέραιο αριθμό N\;(1 \le N \le 10^9).

Έξοδος

Τυπώστε το αποτέλεσμα σε μία μόνο γραμμή.

Παραδείγματα

input

1

output

0

input

10

output

5

input

27

output

18

Comments

There are no comments at the moment.