В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
aminka0095
aminka0095
27.05.2023 13:40 •  Информатика

Девочка Маша любит вырезать из бумаги различные фигуры. Особенно ей нравятся квадраты. На столе перед Машей лежит бумажный прямоугольник размером m × n сантиметров. Девочка хочет, чтобы на столе остались одни лишь квадраты. Пока это не так, она берёт со стола прямоугольник и одним прямолинейным разрезом отрезает от него квадрат. После этого квадрат остаётся на столе, а с остатком происходит то же самое: если он не квадратный, от него одним прямолинейным разрезом отрезается квадрат, и так далее. Наконец, после того, как очередное разрезание привело к появлению двух квадратов, они оба кладутся на стол, и разрезания заканчиваются.

Сколько квадратов окажется у Маши на столе, когда она закончит разрезания?

Формат ввода
В единственной строке ввода заданы целые числа m и n — стороны исходного прямоугольника в сантиметрах (1 ≤ m, n ≤ 2 000 000 000).

Формат вывода
Выведите одно число — количество квадратов, которые окажутся на столе после всех разрезаний.

Показать ответ
Ответ:
Joohoney
Joohoney
26.04.2020 04:05
1)Excel-когда при копировании и переносе формул в другое место в этих ячейках будет меняться АДРЕС ЯЧЕЕК,подчеркни,относительно нового места.Копировать нужно формулу из ячейки D29 в ячейку F30
2)При перемещении оставшиеся на ней формулы.В ней ссылки не изменяются
3)
Функции категории СТАТИСТИЧЕСКИЕ предназначены в первую очередь для анализа диапазонов ячеек в Excel. С данных функций Вы можете вычислить наибольшее, наименьшее или среднее значение, подсчитать количество ячеек, содержащих заданную информацию, и т.д.
4)Вставка надписей происходит при нажатии Ctrl+V а копирка при Ctrl+C
0,0(0 оценок)
Ответ:
nyk156
nyk156
31.05.2021 16:23
Program task5; 
  var v:string; ch,p:integer; 
begin 
  writeln('Введите число');
  readln (ch); 
  case ch of 
    1: v:= ('один'); 
    2: v:= ('два'); 
    3: v:= ('три');
    4: v:= ('четыре');
    5: v:= ('пять');
    6: v:= ('шесть');
    7: v:= ('семь');
    8: v:= ('восемь');
    9: v:= ('девять');
    10: v:= ('десять'); 
    11: v:= ('одиннадцать');
    12: v:= ('двенадцать');
    13: v:= ('тринадцать');
    14: v:= ('четырнадцать');
    15: v:= ('пятнадцать');
    16: v:= ('шестнадцать');
    17: v:= ('семнадцать');
    18: v:= ('восемнадцать');
    19: v:= ('девятнадцать');
    20: v:= ('двадцать' );
    21,22,23,24,25,26,27,28,29: begin p:=(ch mod 10); v:= ('двадцать' ); end;
    30: v:= ('тридцать ');
    31,32,33,34,35,36,37,38,39: begin p:=(ch mod 10); v:= ('тридцать' ); end;
    40: v:= ('сорок');
    41,42,43,44,45,46,47,48,49: begin p:=(ch mod 10); v:= ('сорок' ); end;
    50: v:= ('пятьдесят ');
    51,52,53,54,55,56,57,58,59: begin p:=(ch mod 10); v:= ('пятьдесят' ); end;
    60: v:= ('шестьдесят '); 
    61,62,63,64,65,66,67,68,69: begin p:=(ch mod 10); v:= ('шестьдесят' ); end;
    70: v:= ('семьдесят ');
    71,72,73,74,75,76,77,78,79: begin p:=(ch mod 10); v:= ('семьдесят '); end;
    80: v:= ('восемьдесят '); 
    81,82,83,84,85,86,87,88,89: begin p:=(ch mod 10); v:= ('восемьдесят' ); end;
    90: v:= ('девяносто ');
    91,92,93,94,95,96,97,98,99: begin p:=(ch mod 10); v:= ('девяносто ' ); end;
    100: v:=('сто'); 
  end; 
  writeln(v,p); 
end.

Так оно по крайней мере запускается. Но нет обработки переменной p, по ней надо делать отдельный case of.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота