ТутРешу.Ру

Напишите эффективную программу…

Задание:

Напишите эффективную программу, которая по двум данным натуральным числам m и n, не превосходящим 30000, подсчитывает количество натуральных чисел споследней цифрой 0 на отрезке [m,n] (включая концы отрезка) Программа получает на вход два натуральных числа m и n, при этом гарантируется, что 1≤m≤n≤30000. Программа должна вывести одно число: количество натуральных чисел с последней цифрой 0 на отрезке [m,n].

Решение:

Program Pr1; uses crt; const t=30000; var mas: array[1… t] of integer; i,n,m,l: integer; beginclrscr; for i: =1 to t do mas[i]: =i; writeln ('введите n и m'); readln (n,m); l: =0; for i: =n to m do if mas[i] mod 10=0 then l: =l+1; writeln (l); end.




Знаете другой ответ?

Отправить свой ответ