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

Опишите модель решения поставленной задачи, соблюдая следующие пункты: a) Входные данные программы b) Выходные данные программы c) Цель проектирования программы d) Назначение программы e) Область применения программы​

Показать ответ
Ответ:
FireLily
FireLily
30.12.2020 09:51
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var x:=ArrGen(8,i->Ln(i+1.1)); x.Println;
  var k:=x.Where(t->(Sin(t)>-0.5) and (Sin(t)<=0)).Count;
  var im:=x.IndexMin;
  Writeln('На указанном интервале найдено элементов: ',k);
  Writeln('Минимальный элемент массива, равный ',x[im],
      ' имеет порядковый номер ',im+1)
end.

Результат
0.0953101798043249 0.741937344729377 1.1314021114911 1.41098697371026 1.62924053973028 1.80828877117927 1.96009478404727 2.09186406167839
На указанном интервале найдено элементов: 0
Минимальный элемент массива, равный 0.0953101798043249 имеет порядковый номер 1
0,0(0 оценок)
Ответ:
Chicken10
Chicken10
23.02.2022 08:05

Псевдокод :

Начало

объявление целых переменных a и b

ввод a,b

вывод a+b

вывод a*b

Конец

c# :

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

namespace _1

{

   class Program

   {

       static void Main(string[] args)

       {

           Console.Write("Число a : ");

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

           Console.Write("Число b : ");

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

           Console.WriteLine("Сумма чисел a и b : {0}",a+b);

           Console.WriteLine("Произведение чисел a и b : {0}", a*b);

           Console.ReadKey();

       }

   }

}

PascalABC :

var

 a,b:integer;

Begin

 readln(a,b);

 writeln(a+b);

 writeln(a*b);

End.

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