Мундрунчику и элзику подарили по коробке конфет, по 12 штук в каждой. мундрунчик из своей коробки сьел несколько конфет, а элзик со своей-столько, сколько их осталось в коробке мудрунчика. сколько всего конфет осталось у мундрунчика и элзика?

👇

Ответ:

Икосаэдрик

14.08.2022

12-x=y (За x принимаем то, сколько съел Мундрунчик, а за y то, сколько осталось)
12-y=x
x+y=12
У них осталась одна коробка,,,(12 штук)

4,4(91 оценок)

Открыть все ответы

Ответ:

olqa252ru

14.08.2022

Объяснение:

При обращении к ячейке можно использовать описанные ранее ВЗ, А1:G9 и т. д. Такая адресация называется относительной. При ее использовании в формулахExcelзапоминает расположение относительно текущей ячейки. Так, например, когда вы вводите формулу =B1+B2 в ячейку В4, тоExcelинтерпретирует формулу как "прибавить содержимое ячейки, расположенной тремя рядами выше, к содержимому ячейки, расположенной двумя рядами выше".

Если вы скопировали формулу =В1+В2 из ячейки В4 в С4, Excelтакже интерпретирует формулу как «прибавить содержимое ячейки, расположенной тремя рядами выше, к содержимому ячейки двумя рядами выше». Таким образом, формула в ячейке С 4 примет вид =С1+С2.

Если при копировании формул вы пожелаете сохранить ссылку на конкретную ячейку или область, то вам необходимо воспользоваться абсолютной адресацией. Для ее задания необходимо перед именем столбца и перед номером строки ввести символ $. Например: $В$4 или $C$2:$F$48 и т. д.

Смешанная адресация. Символ $ ставится только там, где он необходим. Например: В$4 или $С2. Тогда при копировании один параметр адреса изменяется. а другой — нет.

4,4(77 оценок)

Ответ:

annasoloveva02

14.08.2022

1. "Традиционный" вариант
//PascalABC.Net 3.0, сборка 1052
function NOD(a, b: longint): longint;
begin
while a <> b do if a > b then a := a - b else b := b - a;
NOD := a
end;

var
f: Text;
tNOD: longint;

begin
Assign(f, 'input.txt'); Reset(f);
if not Eof(f) then Readln(f, tNOD);
var n: longint := 1;
while (not Eof(f)) and (n > 0) and (tNOD > 1) do
begin
    Readln(f, n);
    if n <> 0 then tNOD := NOD(tNOD, n)
end;
Close(f);
Assign(f, 'output.txt'); Rewrite(f);
Writeln(f,tNOD);
Close(f)
end.

2. "Современный" вариант
//PascalABC.Net 3.0, сборка 1052
function NOD(a, b: integer): integer;
begin
while a <> b do if a > b then a -= b else b -= a;
Result := a
end;

var
tNOD: integer := 0;
n: integer;

begin
foreach var sn in Readlines('input.txt') do
begin
    n := StrToInt(sn);
    if tNOD = 0 then tNOD := n
    else
    if n = 0 then break else tNOD := NOD(tNOD, n);
end;
WriteAllText('output.txt', IntToSTR(tNOD));
end.

Пример файла input.txt находится во вложении, контрольный результат 4096

4,5(66 оценок)

Это интересно:

Образование-и-коммуникации

11.07.2021

Как помочь спасти окружающую среду...

08.02.2021

Как найти счастье и любить себя, когда жизнь кажется трудной и неподатливой?...

Компьютеры-и-электроника

28.05.2023

Как создать ISO файл в Linux: шаг за шагом руководство...

Компьютеры-и-электроника

10.03.2023