Якби ви зараз були на Місяці, ваш вага склала б 16,5 відсотків від земного. Щоб дізнатися, скільки це, помножте свій земний вага на 0,165.

Якби щороку протягом наступних 15 років ви додавали по одному кілограму до ваги, якою би виявилася ваша місячний вага в кожен з щорічних візитів на Місяць аж до 15-го року? Напишіть програму, яка за до циклу for друкує на екрані вашу місячну вагу в кожному році.

👇

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

Ответ:

artemmaslov25Artem

02.06.2022

1. Жигули, с единицы номер.
2. Москвич, с семерки номер.
3. Иномарка, не с единицы.
Каждый сказал один факт правду и один - ложь.
Предположим, что первый верно указал цифру 1. Значит, он обманул относительно жигулей. Раз номер с единицы начинается, то другие двое обманули относительно номера, а значит, верно указали марку машины. Но они не могли оба верно указать марку, ведь один сказал - "Москвич", а второй - "иномарка". Значит первое предположение, что номер начинается с единицы - привело нас в тупик. Раз номер не с единички, то первый обманул про номер, значит правду сказал про марку - это "Жигули".
Раз марка жигули, то второй обманул про Москвич, а значит верно сказал про номер с семерки. Третий значит, обманул про иномарку, но верно сказал, что номер не с единицы начинается.
Итого - это были "Жигули" и номер начинается с семерки.

4,7(87 оценок)

Ответ:

winx237

02.06.2022

//PascalABC.NET 3.1 сборка 1239
const
    n = 10;
    m = 10;

var
    i, j: integer;
    a, b: array[1..n, 1..m] of integer;
    f: boolean;

begin
    for i := 1 to n do
    begin
        for j := 1 to m do
        begin
            a[i, j] := random(50);
            write(a[i, j]:3, ' ');
        end;
        writeln;
    end;
    writeln;

    for i := 1 to n do
    begin
        f := false;
        for j := 1 to m do
        begin
            if not f and (a[i, j] mod 2 = 1) then begin
                a[i, j] := 2 * a[i, j];
                f := true;
            end;
            write(a[i, j]:3, ' ');
        end;
        writeln;
    end;
end.

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

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

Хобби-и-рукоделие

17.07.2021

Игра в бочче: правила и секреты успеха...

Финансы-и-бизнес

20.08.2021

Как заработать быстрые деньги онлайн: несколько простых и эффективных способов...

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

01.10.2020

Как подготовиться и успешно выступить с речью...

01.04.2023