Регистрация
Djunisova
09.04.2023 17:37
Информатика
Есть ответ 👍

Определить, все ли цифры натурального числа n одинаковы.

106
262
Посмотреть ответы 2

Ответы на вопрос:

arinashabalina1
arinashabalina1
4,5(2 оценок)
Pascal   var    a,b : integer;     r : boolean;       begin  readln (a);   r : = true;     b : = a mod 10;         while a > 0 do      begin      if a mod 10 < > b then      begin        r : = false;         a : = 0;       end;       a : = a div 10;       end;           if r then    writeln ('все цифры числа одинаковы')    else    writeln ('цифры числа различны');   end.
jsowiwbdjwi
jsowiwbdjwi
4,4(29 оценок)

#include <stdio.h>

signed main()

{

   int x, counter = 0;

   do{

       scanf("%i", &x);

       if(x % 2 == 0)

           counter++;

   }while(x != 0);

   printf("%i", counter-1);

   return 0;

}

Популярно: Информатика