В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География

Как заменить все красные плитки на зелёные вдоль стены, в программе паркетчик? Напишите алгоритм.

Показать ответ
Ответ:
vikki01092
vikki01092
26.07.2020 12:37

using System;


namespace Test

{

   class Program

   {

       static void Main(string[] args)

       {

           double a, b, c;

           a = Double.Parse(Console.ReadLine());

           b = Double.Parse(Console.ReadLine());

           c = Double.Parse(Console.ReadLine());


           double D = b * b - 4.0 * a * c;


           if (a == 0.0)

           {

               double x = -c / b;

               Console.WriteLine("X = {0}", x);

           }

           else

           if (b == 0.0 && -c / a > 0.0)

           {

               double x1 = Math.Sqrt(-c / a);

               double x2 = -Math.Sqrt(-c / a);


               Console.WriteLine("X1 = {0}, X2 = {1}", x1, x2);

           }

           else

           if (D == 0.0)

           {

               double x = -b / (2.0 * a);

               Console.WriteLine(x);

           }

           else

           if (D > 0.0)

           {

               double x1 = (-b - Math.Sqrt(D)) / (2.0 * a);

               double x2 = (-b + Math.Sqrt(D)) / (2.0 * a);


               Console.WriteLine("X1 = {0}, X2 = {1}", x1, x2);

           }

           else

           {

               Console.WriteLine("D < 0, корней нет");

           }


           Console.ReadKey();

       }

   }

}

0,0(0 оценок)
Ответ:
AnjelikaM1
AnjelikaM1
12.01.2023 02:00

а), б)


var a, b, c: char;


begin


 writeln('Введите 3 символа');


 readln(a, b, c);


 writeln('Результат сцепления: ', a+b+c);


 if a>b then writeln(a,'>', b);


 if a>c then writeln(a,'>', c);


 if a=b then writeln(a, '=', b);


 if a=c then writeln(a, '=', c);


 if a<b then writeln(a, '<', b);


 if a<c then writeln(a, '<', c);


 if b>c then writeln(b, '>', c);


 if b<c then writeln(b, '<', c);


end.


в)


var a, b: char;


begin


 writeln('Введите 2 символа');


 readln(a, b);


 if a>b then writeln(b,'  ', a);


 if a<b then writeln(a,'  ', b);


 if a=b then writeln(a,'  ', b);


end.

если правильно дай лутший ответ

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота