М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
женя1373
женя1373
28.08.2022 04:56 •  Информатика

Напишите программу на языке С


Напишите программу на языке С

👇
Открыть все ответы
Ответ:
Одна из простейших игр со стратегией, разновидность игры "Ним".
Игра под названием "Кто первый скажет "Сто"?"
Чтобы первым достичь 100, надо заставить противника при его последнем ходе назвать число 90 до 99 - прибавив к этому числу от 10 до 1, мы выигрываем. Следовательно, при своем предпоследнем ходе, мы должны назвать число 89=100-(10+1). Перед этим надо назвать числа 89-11=78, 67, 56, 45, 34, 23, 12, 1.
Начальное число 1 можно найти сразу как остаток от целочисленного деления 100 на 11. А далее делать шаги по указанным цифрам. Для этого, если противник прибавляет некое m, надо прибавлять 11-m. Или, ничего не считая, называть числа 1, 11+1=12, 12+11=32, .. 87 и 100.

В общем виде, если требуется первым назвать число N, используя числа от 1 до m, начальное число определяем, как остаток деления N на (m+1). А далее, когда противник прибавляет некое k, мы прибавляем m+1-k.
4,5(13 оценок)
Ответ:
zyla24
zyla24
28.08.2022
program Project2;

uses Crt;

var
  n:real;      // переменная n типа real begin

  readln(n); // считываем число с клавиатуры и кладем в переменную n

   if (n < 0) then n := n * n else n := sqrt(n); // если n меньше нуля, то перемножаем n на n иначе берем корень квадратный из n
 
writeln(n:4:4); // выводим полученное число, 4:4 нужно для обрезания дроби, чтобы не получилось +E100000000 ( как пример ) readln; // ждем нажатия enter, чтобы программа сразу не завершилась после вывода результата end. Если будет ругаться на sqrt(n) тогда там где uses Crt пропишите uses Crt, Math;
4,6(75 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ