Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.76/21: Рейтинг темы: голосов - 21, средняя оценка - 4.76
0 / 0 / 0
Регистрация: 10.06.2010
Сообщений: 15
1

. Игрок А объявляет двузначное число от 01 до 99. Игрок В меняет местами его цифры и прибавляет полученное число к сумме его цифр. Полученный результа

11.06.2010, 10:45. Просмотров 3948. Ответов 2
Метки нет (Все метки)

. Игрок А объявляет двузначное число от 01 до 99. Игрок В меняет местами его цифры и прибавляет полученное число к сумме его цифр. Полученный результат он объявляет игроку А. Игрок А проделывает с этим числом ту же процедуру, и так они продолжают поступать поочередно, объявляя числа. От суммы чисел берется остаток от деления на 100, поэтому объявляются лишь двузначные числа. Какие числа может объявить игрок А на начальном шаге, чтобы игрок В в некоторый момент объявил число 00.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.06.2010, 10:45
Ответы с готовыми решениями:

Игрок А объявляет двузначное число от 01 до 99. Игрок В меняет местами его цифры и прибавляет полученное число
Игрок А объявляет двузначное число от 01 до 99. Игрок В меняет местами его цифры и прибавляет...

Какие числа может объявить игрок A на начальном шаге, чтобы игрок B в некоторый момент объявил число 00.
Игрок A объявляет двузначное число от 01 до 99. Игрок B меняет местами его цифры и прибавляет...

Дано двузначное число. Выяснить: Какая из его цифр больше? Одинаковы ли цифры?
Дано двузначное число. Выяснить: Какая из его цифр больше? Одинаковы ли цифры? Прошу написать на...

Дано четырёхзначное число. Вывести число, полученное при прочтении его цифр справа налево
Дано четырёхзначное число нужно вывести число, полученное при прочтении его цифр справа налево...

2
Модератор
61106 / 45818 / 31632
Регистрация: 18.05.2008
Сообщений: 110,337
11.06.2010, 18:23 2
Лучший ответ Сообщение было отмечено kykla... как решение

Решение

Когда-то давно решал, сейчас даже толком алгоритм не вспомнил.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
uses crt;
var a,b,c,i,j:byte;
begin
clrscr;
a:=100;
b:=100;
c:=100;
while c>0 do
 begin
  c:=c-1;
  for i:=0 to 9 do
  for j:=0 to 9 do
  if 11*j+2*i=b then
   begin
    a:=10*i+j;
    write(a,' ');
   end;
  for i:=0 to 9 do
  for j:=0 to 9 do
  if 11*j+2*i=a then b:=10*i+j;
 end;
readln
end.
0
0 / 0 / 1
Регистрация: 18.12.2015
Сообщений: 1
28.04.2016, 20:02 3
Puporev, Ваша программа показывает три ответа, правильный из них только один. Первый

Добавлено через 1 минуту
Немного по-другому:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var a,x,b,i,j:integer;
begin
x:=100;
b:=100;
 begin
  b:=b-1;
  for i:=0 to 9 do
  for j:=0 to 9 do
  if 11*j+2*i=100 then
   begin
    a:=10*i+j;
    write(a);
   end;
 end;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.04.2016, 20:02

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Дано двузначное число. Вывести число, полученное при перестановке цифр исходного числа
Дано двузначное число. Вывести число, полученное при перестановке цифр исходного числа.

Дано двузначное число. Вывести число, полученное при перестановке цифр исходного числа.
Скоро экзамен , кто чем может ) Помоги ближнему , ибо смех продлевает жизнь...) 4. Дано...

Если к сумме цифр двузначного числа прибавить квадрат цифры единиц, то снова получится это двузначное число.
Если к сумме цифр двузначного числа прибавить квадрат цифры единиц, то снова получится это...

Счастливым называется шестизначное число, у которого сумма его первых трех цифр равна сумме его трех последних цифр
Опледелить является ли заданное шестизначное число счастливым? "Счастливым называется...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.