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 στο μάθημα των υπολογιστών. Για την εργασία για το σπίτι ο δάσκαλός του έγραψε το ακόλουθο πρόγραμμα στο τετράδιό του και πρέπει να προσδιορίσει την έξοδο, δεδομένου του ακέραιου .
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.
Είσοδος
Η πρώτη γραμμή εισόδου περιέχει τον ακέραιο αριθμό .
Έξοδος
Τυπώστε το αποτέλεσμα σε μία μόνο γραμμή.
Παραδείγματα
input
1
output
0
input
10
output
5
input
27
output
18
Comments