1. Даны три целых числа. Выбрать из них те, которые принадлежат интервалу [1,3].
2. Заданы два числа X, Y. Меньшее из двух значений заменить на 0. Если же они равны – заменить нулями оба.
3. Заданы три целых числа X, Y, Z. Найти наименьшее из их произведения и суммы.
4. Дано двузначное число. Определить, равен ли квадрат этого числа учетверенной сумме кубов его цифр. Например, для числа 48 ответ
НА ЯЗЫКЕ С++
// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (n, i) := (ReadInteger('N ='), 9);
var st := new Stack<integer>;
if n = 1 then st.Push(1)
else
if n <= 0 then
begin
Println('Требуется натуральное число');
Exit
end;
while (i > 1) and (n <> 1) do
if n mod i = 0 then
begin
st.Push(i);
n := n div i
end
else i -= 1;
Print('M =');
if n > 1 then Print('0')
else st.Println('')
end.
Пример
N = 420
M = 2567
1. Электронная почта - это "интернет-портал", с которого предоставляется возможность отправлять письма в электронном виде.
2. Заголовок сервера, тело письма
3. На сервере, где была произведена регистрация
4. Он состоит из имени пользователя, под которым он зарегистрирован на сервере электронной почты. И адреса, разделенных собачкой.
5. В чень сильно устаревших учебниках под телеконференциями понимают организованный тематический обмен сообщениями между пользователями сети. Сейчас это чаще называют форумами.
6. Чтобы стать участником форума, надо зайти на сайт форума, если требуется, зарегистрироваться, и общаться.
7. Архивация (сжатие) файла либо нескольких файлов производиться с целью уменьшения места, занимаемого ими на диске.