М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
romababiy09
romababiy09
13.09.2021 22:35 •  Информатика

За до графічного редактора Paint створити 4 великодні писанки, використавши характерні орнаменти різних регіонів України (зразки писанок
відшукати в мережі інтернет);
2) роботу зберегти одним зображенням

👇
Открыть все ответы
Ответ:
lizadexx
lizadexx
13.09.2021
Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace pzn
{

    class Program
    {
       public static void Main(string[] args)
        {
            int x = Convert.ToInt32(Console.ReadLine());
            int y = Convert.ToInt32(Console.ReadLine());
            int temp;
            if (x<y)
            {
                x ^= y;
                y ^= x;
                x ^= y;    
            }
            Console.WriteLine("x={0}, y={1}", x, y);
            Console.ReadKey();
        }
    }
}
4,7(48 оценок)
Ответ:
KateBytorova
KateBytorova
13.09.2021
Function F(x: real): real;
begin
  F := 3 * sin(x) + 2 * sqr(x) - 1;
end;

var
  a, b, h, x, Fa, Fx: real;

begin
  Write('Введите через пробел начало интервала, конец и шаг: ');
  Readln(a, b, h);
  x := a; Fa := F(a);
  repeat
    Fx := F(x);
    if Fx = 0 then Writeln('Найден корень ', x:0:3)
    else
    if Fx * Fa < 0 then
      Writeln('Найден интервал изоляции корня (', a:0:3, ';', x:0:3, ')');
    a := x; Fa := Fx; x := x + h
  until x > b;
end.

Тестовое решение:

Введите через пробел начало интервала, конец и шаг: 0 1.95 0.15
Найден интервал изоляции корня (0.150;0.300)

Введите через пробел начало интервала, конец и шаг: -5 5 0.1
Найден интервал изоляции корня (-1.500;-1.400)
Найден интервал изоляции корня (0.200;0.300)

Программа pascal которая отделяет корни уравнения: составляет таблицу значений функции на интервале
4,8(63 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ