//PascalABC.NET
uses GraphABC;
var c: integer;
begin
window.IsFixedSize := true;//запрет изменения размера экрана
window.Clear(cllightblue);//очистка экрана синим цветом
pen.Color := clred;//меняем цвет пера на красный
for var i := 0 to 19 do//цикл для отрисовки линий
begin
c := (window.Height div 19) * i;//сдвиг линнии по y
line(0, 0 + c, window.Width, window.Height - c);//рисуем линию
end;
end.
IP-адрес имеет вид четырех чисел в диапазоне 0-255, разделенных точками.
Выпишем имеющиеся части адреса
2.12
22
.30
5.121
После 121 может следовать только точка или 121 должно быть последним в адресе.
а) Рассмотрим вариант с точкой. Такая часть лишь одна и получим 5.121.30
После 30 не может цифр, только точка, потому что число 30х превысит 255. Но элементов с точкой у нас больше нет, следовательно, 5.121.30 - это окончание адреса.
Если перед ним поставить 2.12, получим <em>222.125.131.30</em> - допустимо.
Если поставить 22, получим 2.12225.121.30 - недопустимо
б) рассмотрим вариант, когда 5.121 - последний элемент
Перед 5 может быть или 22, или 2.12
Вариант с 22 даст нам 225.12 и перед 225 нужна точка, но таких элементов нет.
Вариант с 2.12 дает 2.125.121 и перед ним нельзя поставить .30 из-за недопустимого адреса 302. А если поставить 22, получим .30222.125.121, что тоже недопустимо.
Ответ: БАГВ<span />
<em>Было занятно сделать все это в виде одного оператора)))</em>
<em>// PascalABC.NET 3.2, сборка 1439 от 09.05.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadlnString('->').ToWords(Arr(',','.'))
.Select(w->w.Where(c->Pos(c,'аеёиоуыэюя')>0).GroupBy(x->x)
.Select(x->(x.Key,x.Count)).Where(x->x[1]>2)).Where(x->x.Count>0)
.SelectMany(x->x).Select(x->x.Item1).Distinct.OrderBy(x->x)
.Println(',')
end.
<u>Пример</u>
-> дает,корова,молоко,длинношеее,животное,жираф,катамаран.
а,е,о
Ответ:
a = float(input("Введите в каких единицах измерения будите вводить числа. 1 - килобайты, 2 - мегобайты, 3 - гигобайты... (терабайт, петабайт, эксабайт, зеттабайт, йоттобайт) "))
b = float(input("введите число "))
vid = float(input("введите в какие единицы хотите перевести число (см первую запись) "))
d = 1024**a * b
er = 1024**vid
print(d/er )
Объяснение:
Напишу ответ если напишешь по русски а не по украинскому