Помогите пожалуйстааа♥♥♥ 35 баллов!

С помошью циклов вывести на экран номера всех "счастливых" билетов из диапазона 000000 до 999999

Килгара

var
i1,i2,i3,i4,i5,i6:Longint;
begin
For i1:=0 to 9 do
For i2:=0 to 9 do
For i3:=0 to 9 do
For i4:=0 to 9 do
For i5:=0 to 9 do
For i6:=0 to 9 do
if i1+i2+i3=i4+i5+i6 then Writeln('счастливый билет':i1,i2,i3,i4,i5,i6);
Writeln('все миллионеры :D')
end.

0 0

4 года назад

Прочитать ещё 2 ответа

Для узла с IP-адресом 48.95.137.38 адрес сети равен 48.95.128.0. Найдите наименьшее возможное количество единиц в двоичной запис

vitek8573

Первые различающиеся байты переведем в двоичную систему счисления(третий байт):
$128_1_0=1000 0000_2$
$137_1_0=10001001_2$
Найдем наименьшее возможное значение третьего байта. Выпишем в столбик двоичные записи чисел 128 и 137. Добавим еще одну строчку, в которую будем записывать минимально возможное значение третьего байта. Если значения в столбике одинаковые, то ставим соответствующее число, если они различаются, ставим какой-нибудь знак. Я поставил знак '?'.

$10000000 \newline
10001001 \newline
1000?00?$
Теперь перенесем все '?' к последней единице(в нашем случае она и первая):
$1??00000$

Так как нам нужно найти наименьшее возможное значение, заменяем '?' на нули:
$10000000$

Т.к. в маске подсети сначала идут только единицы, а затем нули, то логично, что если третий байт имеет значение 1000 0000, то первый и второй байт имеют значения 11111111.
Следовательно наименьшая маска подсети имеет вид: 11111111.11111111.10000000.00000000

Ответ: 17 единиц.

0 0

4 года назад

На экране с разрешающей способностью 640x200 высвечиваються только двух цветные изображения. какой минимальный объём видеопамяти

LSH

N = P*r, r = log2(I)
N - объем памяти
P - пиксели
r - разрешение
I - количество цветов
<span>все переменные в битах
r = log2(2)
N = 640*200*r = 640*200=128000 бит
</span>

0 0

3 года назад

СПАСАЙТЕ!! ОТДАЮ ПОСЛЕДНИЕ БАЛЛЫ!!!ьЗапишите на алгоритмическом языке алгоритм построения окружности заданного радиуса r, проход

olicka [7]

Точки А и В - любые точки на плоскости.

Установить раствор циркуля равный заданному радиусу.
Установить ножку циркуля в точку А, провести окружность.
Установить ножку циркуля в точку В, провести окружность.
Есть ли точки пересечения?
Нет - искомой окружности не существует.
Да - Устанавливаем ножку циркуля в точку пересечения, проводим окружность.

(Точек пересечения может быть две, тогда можно построить две окружности. Или окружности могут соприкасаться в одной точке, тогда искомая окружность будет одна.)

0 0

4 года назад

Написать программу которая запрашивает два целых числа и выводит на экран больший из них

Андрей Вивальди [50]

//PascalABC.NET
//Версия 3.3, сборка 1627
begin
write(max(ReadInteger,ReadInteger));
end.

0 0

2 года назад