Вопрос по информатике:
Паскаль программа
1)Программа загадывает случайное целое число из отрезка [1;10] и просит пользователя его угадать, вводя варианты с клавиатуры, пока пользователь не угадает число, программа будет ему подсказывать, сообщая больше или меньше число загаданное, чем то, что ввёл пользователь.
2)Ввести число (меньше 200000). Поменять в числе цифры местами. Например: вводится 23456 получается 65432.
- 08.05.2018 02:14
- Информатика
- remove_red_eye 16211
- thumb_up 89
Ответы и объяснения 1
1)
var a, b: integer;
begin
a := random(9) + 1;
repeat
readln(b);
if (a > b) then writeln('X > ', b);
if (a < b) then writeln('X < ', b);
until (a = b);
writeln('WIN!');
end.
2)
"Лучшее решение - самое простое"
-GLaDOS =)
var a, i: integer;br /> b: strin
- 09.05.2018 00:09
- thumb_up 13
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.