Михайловна-Гусева350
?>

Информатика оқулығының бір бетінің жəне бүтіндей оқулықтың жуық ақпараттың көлемін өлшендер​

Информатика

Ответы

Amelin-Alipova

Онын олшемы, 40 см 60 ены

a580028r
Попробуйте вызвать диспетчер : либо при одновременного нажатия клавиш ctrl+shift+esc, либо просто кликнув правой клавишей мыши по панели .
найдите процесс "проводник" или explorer), кликните по нему правой кнопкой мыши и нажмите "перезапустить".
если первый способ не , пробуем второй вариант: запустить пуск при power
для этого зайдите в "компьютер" -> "диск с" -> "windows" -> "system32" -> "windowspowershell" и запустите приложение powershell и в открывшемся окне приложения введите команду: get-appxpackage -allusers | foreach {add-appxpackage -disabledevelopmentmode -register “$($_.installlocation)\appxmanifest.xml”}
закройте приложение, проверьте - теперь меню "пуск" должно открыться.
если оба способа не , попробуйте создать нового пользователя. для этого нажмите "win+r", чтобы открыть панель введите слово "control", нажмите ок.
в открывшемся окне "все элементы панели " найдите "учетные записи пользователей", выберите " другой учетной записью" , затем "добавить нового пользователя".
таким образом можно создать нового пользователя, на которого перенести все файлы предыдущего пользователя, после чего просто удалить старую учетную запись.
если ничего не сработало - придется переустанавливать windows.
andrew-lev2501

program five;

var

 number, quantity: integer;

begin

 quantity := 0;

 read(number);

 while number > 0 do

 begin

   if (number mod 10 mod 5 = 0) then

     inc(quantity);

   number := number div 10;

 end;

 write(quantity);

end.

Объяснение:

program five;  // Название программы

var

 number, quantity: integer;  // Целочисленные переменные:

number - вводимое с клавиатуры число;quantity - количество цифр кратных 5.

begin  // Начало программы

 quantity := 0;  // Количество цифр = 0

 read(number);  // Ввод числа с клавиатуры

 while number > 0 do  // Пока значение переменной number > 0

 begin  // Начало цикла

   if (number mod 10 mod 5 = 0) then  // Если последняя цифра переменной number (number mod 10) при делении на 5 дает остаток 0, тогда

     inc(quantity);  // Прибавляем к переменной quantity единицу

   number := number div 10;  // Удаляем последнюю цифру числа

 end;  // Конец цикла

 write(quantity);  // Вывод ответа

end. // Конец программы

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

Поделитесь своими знаниями, ответьте на вопрос:

Информатика оқулығының бір бетінің жəне бүтіндей оқулықтың жуық ақпараттың көлемін өлшендер​
Ваше имя (никнейм)*
Email*
Комментарий*