Информатика: Информатика,все условия на изображении

Информатика,все условия на изображении

👇

Увидеть ответ

Ответ:

адиль77

02.12.2022

1) x = -10, y1 = 100, y2 = -11

2) x = -9, y1 = 81, y2 = -9

3) x = -8, y1 = 64, y2 = -7

4) x = -7, y1 = 49, y2 = -5

5) x = -6, y1 = 36, y2 = -3

6) x = -5, y1 = 25, y2 = -1

7) x = -4, y1 = 16, y2 = 1

8) x = -3, y1 = 9, y2 = 3

9) x = -2, y1 = 4, y2 = 5

10) x = -1, y1 = 1, y2 = 7

11) x = 0, y1 = 0, y2 = 9

12) x = 1, y1 = 1, y2 = 11

13) x = 2, y1 = 4, y2 = 13

14) x = 3, y1 = 9, y2 = 15

15) x = 4, y1 = 16, y2 = 17

16) x = 5, y1 = 25, y2 = 19

17) x = 6, y1 = 36, y2 = 21

18) x = 7, y1 = 49, y2 = 23

19) x = 8, y1 = 64, y2 = 25

20) x = 9, y1 = 81, y2 = 27

21) x = 10, y1 = 100, y2 = 29

22) x = 11, y1 = 121, y2 = 31

Объяснение:

Программа написана на DevC++.

4,6(10 оценок)

Ответ:

Malifisen

02.12.2022

В B2 пиши =степень(A2;2)

В B3 пиши =степень(A3;2)

В С2 пиши =2*A2+9

В С3 пиши =2*A3+9

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

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

Ответ:

ghvcn

02.12.2022

Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Text.RegularExpressions;

internal static class Program
{
    private const string glasnye_ = "aeiouy";
    private const string soglasnye_ = "bcdfghjklmnpqrstvwxz";

    private static void Main()
    {
        try
        {
            Console.WriteLine("Введите строку слов (любые символы будут считаться разделителями)");
            var s = Console.ReadLine();
            Console.WriteLine($"Гласных больше чем согласных:\n {Task1(s).Aggregate("", (current, t) => current + t.ToUpper() + " ")}");
            Console.WriteLine();
            Console.WriteLine($"Гласных больше чем согласных:\n {Task1Regex(s).Aggregate("", (current, t) => current + t.ToUpper() + " ")}");
            Console.ReadLine();
        }
        catch(Exception e)
        {
            Console.WriteLine(e);
            Console.ReadLine();
        }
    }

    private static IEnumerable<string> Task1(string s)
    {
        Console.ForegroundColor = ConsoleColor.Cyan;
        Console.WriteLine("Без регулярных выражений");

        var words = s.Split(new[] {' ', '-', ',', '.', '*', ':', ';', '_'}, StringSplitOptions.RemoveEmptyEntries).ToList();

        var sb = new StringBuilder();
        for (var i = 0; i < words.Count; i++)
            sb.AppendLine($"Слово[{i}] = {words[i].ToUpper()}");

        Console.Write(sb.ToString());

        var result = new List<string>();

        foreach (var word in words)
        {
            var k = 0;
            foreach (var c in word.ToLower().ToCharArray())
            {
                k += glasnye_.Contains(c) ? 1 : 0;
                k -= soglasnye_.Contains(c) ? 1 : 0;
            }

            if (k > 0)
                result.Add(word);
        }

        return result;
    }

    private static IEnumerable<string> Task1Regex(string s)
    {
        Console.ForegroundColor = ConsoleColor.Green;
        Console.WriteLine("С регулярными выражениями");

        var ms = Regex.Matches(s, @"[A-z]+", RegexOptions.IgnoreCase);

        var sb = new StringBuilder();
        for (var i = 0; i < ms.Count; i++)
            sb.AppendLine($"Слово[{i}] = {ms[i].Value.ToUpper()}");

        Console.Write(sb.ToString());

        var result = new List<string>();
        for (var i = 0; i < ms.Count; i++)
        {
            var v = ms[i].Value;
            var k = Regex.Matches(v, $"[{glasnye_}]", RegexOptions.IgnoreCase).Count;
            k -= Regex.Matches(v, $"[{soglasnye_}]", RegexOptions.IgnoreCase).Count;
            if (k > 0)
                result.Add(v);
        }

        return result;
    }
}

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

Ответ:

Карапиди

02.12.2022

Как бы написал я:

program n_1;
var x1, x2, y1, y2, x, y: integer;
begin
writeln ('Введите значения координат(x1,x2,y1,y2,x,y):');
readln (x1, x2, y1, y2, x, y);
if (x>x1) and (x<x2) and (y>y2) and (y<y1) then writeln('Точка с координатами (',x,';',y,') пренадлежит прямоугольнику')
else writeln('Точка с координатами (',x,';',y,') не пренадлежит прямоугольнику');
end.

Булевой переменной не нужно, она же 1 раз используется.
Далее, ошибка была (x<2) нужно было

Ну или если только без ошибки, то вот:

program n_1;
var x1, x2, y1, y2, x, y: integer;
a: Boolean;
begin
writeln ('Введите значения координат');
readln (x1, x2, y1, y2, x, y);
a:= (x>x1)and(x<x2)and(y>y2)and(y<y1);
writeln ('Точка с координатами принадлежит прямоугольнику ', a);
end.

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

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

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

21.03.2023

10 способов развить способность к обучению...

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

17.08.2020

Как перевести деньги через Western Union: шаг за шагом...

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

25.10.2020

Как связать на спицах игрушечного медведя...

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