Автомат получает на вход трёхзначное десятичное число. По полученному числу строится новое десятичное число по
следующим правилам. 1. Вычисляются два числа – сумма старшего и среднего разрядов, а также сумма среднего и младшего разрядов заданного числа. 2. Полученные два числа записываются друг за другом в порядке невозрастания (без разделителей). Пример. Исходное число: 277. Поразрядные суммы: 9, 14. Результат: 149. Определите, сколько из приведённых ниже чисел может получиться в результате работы автомата. 1515 159 153 1915 1519 315 915 115 В ответе запишите только количество чисел.
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Порнелл
Program razryadi;
var a, b, c , z, summax, summin: integer;
begin
writeln (z);
readln (z);
begin;
a := z div 100;
b := z div 10 mod 10;
c := z mod 100 mod 10;
end;
begin;
if (a > b) and (b > c) then
summax := a + b;
summin := b + c;
if (a > c) and (c > b) then
summax := a + c;
summin := b + c;
if (b > c) and (c > a) then
summax := a + c;
summin := a + c;
if (b > a) and (a > c) then
summax := a + b;
summin := a + c;
if (c > a) and (a > b) then
summax := a + c;
summin := a + b;
if (c > b) and (b > a) then
summax := c + b;
summin := a + b;
end;
begin;
if summin >= summax then
write (summax, summin)
else write (summin, summax);
end;
end.
var a, b, c , z, summax, summin: integer;
begin
writeln (z);
readln (z);
begin;
a := z div 100;
b := z div 10 mod 10;
c := z mod 100 mod 10;
end;
begin;
if (a > b) and (b > c) then
summax := a + b;
summin := b + c;
if (a > c) and (c > b) then
summax := a + c;
summin := b + c;
if (b > c) and (c > a) then
summax := a + c;
summin := a + c;
if (b > a) and (a > c) then
summax := a + b;
summin := a + c;
if (c > a) and (a > b) then
summax := a + c;
summin := a + b;
if (c > b) and (b > a) then
summax := c + b;
summin := a + b;
end;
begin;
if summin >= summax then
write (summax, summin)
else write (summin, summax);
end;
end.
Новые вопросы в разделе Информатика
s3129502@gmail.com
16.02.2024, 13:53
Информатика
7-9 класс
Адинела
05.10.2022, 08:15
Гаязутдин
05.10.2022, 01:10
Алайбек
05.10.2022, 01:05
Акияма
05.10.2022, 01:00
