На вход программе подаются два целых числа a и b (a≤b). Напишите программу, которая подсчитывает количество чисел в диапазоне от a до b включительно, куб которых оканчивается на 4 или 9. Формат входных данных

На вход программе подаются два целых числа a и b (a≤b).

Формат выходных данных

Программа должна вывести одно целое число в соответствии с условием программы.

Примечание. Куб числа aa – это его третья степень a^3a

.

pascal

Объяснение:

var

 a, b, col: integer;

begin

 repeat

   Write('Введите число a: '); ReadLn(a);

   Write('Введите число b: '); ReadLn(b);

 until a<=b;

 repeat

   if ((sqr(a)*a) mod 10 = 4) or ((sqr(a)*a) mod 10 = 9) then inc(col);

   inc(a);

 until a>b;

 WriteLn('Количество чисел в диапазоне от ', a, ' до ', b,

         ' включительно, куб которых оканчивается на 4 или 9 равно ', col);

end.

program aaa;   var d, n : integer; begin  write ('введите число n-');   readln (n);   writeln('делители числа: ');   for d : =1 to n do  if n mod d = 0 then writeln (d)end.

# include < stdio.h> int phi(int x){int i,k=0; if(x> 1)k+=phi(x-1)+phi(x-2); if(x< 2)k=x; return k; }      int main (void){int x; scanf("%d",& x); printf("%d",phi(x)); return 0; }