3 года назад

Изменяя лишь одну букву в слове, востановить следующие ципочки слов мак-...-...-лук;лор-...-...-сук

Знания

Информатика

1 ответ:

Николай-89 [31]3 года назад

0 0

Мак мук лук; лор сор сур сук

Читайте также

Переведите в килобайты: 1) 1234 бит 2) 580 байт 3) 4564 мбайт.

Оля Сорокина [136]

1 бит - 0,00012 кб
1 байт - 0,00098 кб
1 мегабайт = 1024 кб
1) 1234 бит = 0,15 кб
2) 580 байт = 0,57 кб
3) 4564 мегабайт = 4673536

0 0

1 год назад

Среди чисел от 1 до 100.Найдите все пары чисел для которых их сумма равняется произведению.Pascal

Мариша02

Из целых чисел такая пара только одна - 2 и 2.
А если программу писать, то так
var a, b: integer
BEGIN
for a=1 to 100 do
begin
    for b=1 to 100 do
    begin
        if a+b=a*b then write (a, b);
    end;
end;
END.
Если можно брать нецелые числа, то для любого х второе число равно x/(x-1)
Например, 3 и 3/2. 3 + 3/2 = 3*3/2 = 9/2

0 0

3 года назад

Имеются два кувшина емкостью 3 и 8 литров. Нужно написать алгоритм выполняя который можно набрать из реки 7 литров воды

Vosil

Дважды из кувшина 8 лит. наливаем воду в кувшин 3 литра, а затем выливаем воду. Так делаем два раза. В кувшине из под восьми литров осталось два литра. Эти два литра выливаем в три литра, а кувшин восемь литров снов полностью набираем. <span>Из полного кувшина 8 литров доливаем в кувшин 3 литра оставшийся 1 литр. В итоге у нас кувшин 8л в котором 7л воды. </span>

0 0

4 года назад

Написать программу, которая заменяет все символы a, A, b, B на символ c

Jikmer [50]

<h3>PascalABC.NET 3.4.2, сборка 1859 от 08.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>

begin

var s:=ReadlnString;

s:=s.RegexReplace('[AaBb]','c');

s.Println

end.

<h3>Пример</h3>

A quick movement of the enemy will jeopardize six gunboats.

c quick movement of the enemy will jeopcrdize six guncocts.

0 0

4 года назад

С помощью чего мы общаемся?

BarRust

С помощу 17 мищц челюсти и язика

0 0

4 года назад