Вопрос по информатике:
Исполнитель “Раздвоитель” преобразует натуральные числа. У него есть две команды: “Вычесть 1” и “Разделить на 2”, первая команда уменьшает число на 1, вторая команда уменьшает число в два раза, если оно чётное, иначе происходит ошибка
(паскаль)
- 04.09.2018 08:00
- Информатика
- remove_red_eye 6557
- thumb_up 43
Ответы и объяснения 1
Var n,k:integer;
begin
write('n='); readln(n);
write('k='); readln(k);
case k of
1: begin n:=n-1; writeln('n=',n); end;
2: if n mod 2 = 0
then begin n:=n div 2; writeln('n=',n); end
else writeln('Ошибка');
else writeln('Неверная команда');
end;
end.
Пример:
n=16
k=2
n=8
- 05.09.2018 23:18
- thumb_up 10
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.