
1. Даны три числа a, b, c. Определить, какое из них равно d. Если равных d чисел нет, то найти
максимальное из d-a, d-b, d-c. Примеры: • Вход: 10 4 15 4 Выход: второе число равно 4 • Вход: 5 13 9 7 Выход: максимальная разность 2. 2. Составить программу, которая при введенном возрасте человека правильно печатает: «Вам х лет (год, года)!». Например: • Вход: 44 Выход: Вам 44 года! • Вход: 31 Выход: Вам 31 год! • Вход: 11 Выход: Вам 11 лет! 3. Одной банки краски хватает на покраску x м2 площади. Забор имеет форму прямоугольника: высота а м, длина b м. Сколько целых банок краски необходимо приобрести, чтобы покрасить забор? Вход: х=5 а=3 b=200 Выход:120 Вход: х=3.35 а=2.5 b=12 Выход:9 4. Даны 2 числа. Если их сумма больше 10, то вывести на экран их удвоенное произведение, а иначе большее из чисел заменить их суммой, а меньшее разностью. Вход: 25 -8 Выход: -400 Вход: 5 3 Выход: 8 2

Ответы на вопрос

// Cборка 1590 от 03.12.2017
1)
begin
var (a,b,c):=ReadInteger3('Введите a,b,c,d-> '); var d:=ReadInteger;
if a=d then begin Println('Первое число равно',d); exit; end;
if b=d then begin Println('Второе число равно',d); exit; end;
if c=d then begin Println('Третье число равно',d); exit; end;
a:=d-a; b:=d-b; c:=d-c;
var max:=max(max(a,b),c);
Println('Максимальная разность->',max);
end.
2)
begin
var a:=ReadInteger('Введите возраст->');
if (a mod 10=1) and (a<>11)
then writelnformat('Вам {0} год',a)
else
if (a mod 10=2) or (a mod 10=3) or (a mod 10=4)
then writelnformat('Вам {0} года',a)
else writelnformat('Вам {0} лет',a);
end.
3)
begin
var (x,a,b):=readreal3('Введите x,a,b->');
WritelnFormat('Нужно приобрести {0} банок краски',Round((a*b)/x));
end.
4)
begin
var (a,b):=readreal2('Введите a,b->');
if a+b>10
then println(2*a*b)
else
if a>b
then
Println(a+b,a-b)
else
Println(a-b,a+b);
end.



Задача 1: Определение значения и нахождение максимальной разности
Даны три числа: a, b и c. Нам нужно определить, какое из них равно числу d. Если ни одно из чисел не равно d, то нужно найти максимальную разность между d и каждым из чисел d-a, d-b и d-c.
Давайте решим эту задачу по порядку.
Шаг 1: Считываем значения a, b, c и d.
Шаг 2: Проверяем, равно ли одно из чисел a, b или c числу d. Если да, то выводим это число и завершаем программу.
Шаг 3: Если ни одно из чисел a, b или c не равно числу d, то находим максимальную разность между d и каждым из чисел d-a, d-b и d-c.
Шаг 4: Выводим максимальную разность.
Вот пример кода на языке Python, который решает данную задачу:
```python a = int(input("Введите значение a: ")) b = int(input("Введите значение b: ")) c = int(input("Введите значение c: ")) d = int(input("Введите значение d: "))
if a == d: print("Первое число равно d") elif b == d: print("Второе число равно d") elif c == d: print("Третье число равно d") else: max_difference = max(d - a, d - b, d - c) print("Максимальная разность равна", max_difference) ```
Примеры:
* Вход: 10 4 15 4 Выход: Второе число равно 4
* Вход: 5 13 9 7 Выход: Максимальная разность равна 2
Задача 2: Вывод возраста человека
Мы хотим составить программу, которая при введенном возрасте человека правильно выводит его возраст вместе с соответствующим словом (год, года, лет).
Шаг 1: Считываем значение возраста age.
Шаг 2: Проверяем последнюю цифру возраста. Если она равна 1 и не равна 11, то выводим "год". Если последняя цифра в диапазоне от 2 до 4, и исключая числа от 12 до 14, то выводим "года". Во всех остальных случаях выводим "лет".
Шаг 3: Выводим сообщение с правильным словом для возраста.
Вот пример кода на языке Python, который решает данную задачу:
```python age = int(input("Введите возраст: "))
last_digit = age % 10
if last_digit == 1 and age != 11: print("Вам", age, "год!") elif last_digit in range(2, 5) and age not in range(12, 15): print("Вам", age, "года!") else: print("Вам", age, "лет!") ```
Примеры:
* Вход: 44 Выход: Вам 44 года!
* Вход: 31 Выход: Вам 31 год!
* Вход: 11 Выход: Вам 11 лет!
Задача 3: Количество банок краски для покраски забора
У нас есть одна банка краски, которой хватает на покраску x м2 площади. Забор имеет форму прямоугольника с высотой a м и длиной b м. Нам нужно определить, сколько целых банок краски нам необходимо приобрести, чтобы покрасить забор.
Шаг 1: Считываем значения x, a и b.
Шаг 2: Вычисляем площадь забора, умножая высоту на длину.
Шаг 3: Определяем количество банок краски, разделив площадь забора на количество квадратных метров, которые можно покрасить одной банкой краски. Округляем результат до ближайшего целого числа в большую сторону.
Шаг 4: Выводим количество банок краски.
Вот пример кода на языке Python, который решает данную задачу:
```python import math
x = int(input("Введите количество м2, которые можно покрасить одной банкой краски: ")) a = int(input("Введите высоту забора в метрах: ")) b = int(input("Введите длину забора в метрах: "))
fence_area = a * b paint_cans = math.ceil(fence_area / x)
print("Необходимо приобрести", paint_cans, "банок краски.") ```
Примеры:
* Вход: x = 5, a = 3, b = 200 Выход: Необходимо приобрести 120 банок краски.
* Вход: x = 3.35, a = 2.5, b = 12 Выход: Необходимо приобрести 9 банок краски.
Задача 4: Удвоенное произведение или замена чисел
Даны два числа. Если их сумма больше 10, то нужно вывести на экран их удвоенное произведение, иначе нужно заменить большее число на их сумму, а меньшее число на их разность.
Шаг 1: Считываем значения чисел num1 и num2.
Шаг 2: Вычисляем сумму чисел.
Шаг 3: Проверяем, больше ли сумма чисел 10. Если да, то выводим удвоенное произведение чисел num1 и num2.
Шаг 4: Если сумма чисел меньше или равна 10, то находим большее и меньшее число и заменяем их на их сумму и разность соответственно.
Шаг 5: Выводим результат.
Вот пример кода на языке Python, который решает данную задачу:
```python num1 = int(input("Введите первое число: ")) num2 = int(input("Введите второе число: "))
sum_of_numbers = num1 + num2
if sum_of_numbers > 10: product = num1 * num2 * 2 print(product) else: if num1 > num2: num1 = sum_of_numbers num2 = num1 - num2 else: num2 = sum_of_numbers num1 = num1 - num2 print(num1, num2) ```
Примеры:
* Вход: 25 -8 Выход: -400
* Вход: 5 3 Выход: 8


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