спрос3
02.05.2021 12:50

Нужно нарисовать блок-схемы по графикам


Нужно нарисовать блок-схемы по графикам
Нужно нарисовать блок-схемы по графикам
Нужно нарисовать блок-схемы по графикам
Нужно нарисовать блок-схемы по графикам

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
strongbbt
03.09.2021 06:53

#include <iostream>

#include <clocale>

using namespace std;

int main()

{

   setlocale(LC_ALL,"Russian");

   int s;

   cout << "Введите s: ";

   cin >> s;

   switch(s)

   {

       case 0: cout << "LOSE"; break;

       case 1: cout << "DRAW"; break;

       case 3: cout << "WIN"; break;

       default: cout << "Неверное число."; break;

   }

}

Объяснение:

#include <iostream>  // Библиотека ввода-вывода

#include <clocale>  // Библиотека локализации (возможно, будет работать без нее)

using namespace std;  // Пространство имён

int main()

{

   setlocale(LC_ALL,"Russian");  // Локализация (возможно, будет работать без нее)

   int s;  // Создание целочисленной переменной

   cout << "Введите s: ";  // Вывод текста в консоль

   cin >> s;  // Ввод переменной с клавиатуры

   switch(s)  // Принимает значение s

   {

       case 0: cout << "LOSE"; break;  // Если s = 0, то выводим LOSE

       case 1: cout << "DRAW"; break;  // Если s = 1, то выводим DRAW

       case 3: cout << "WIN"; break;  // Если s = 3, то выводим WIN

       default: cout << "Неверное число."; break;  // Если s не равно ни одному из трёх чисел, то выводим Неверное число

   }

}

0,0(0 оценок)
Ответ:
flint4040p070t0
24.02.2023 09:24

1.

const N = 10;

var a: array [1..N] of integer;

i, x: integer;

begin

  write('Введите x: ');

  readln(x);

  for i := 1 to N do

  begin

      a[i] := x + i - 1;

      write(a[i], ' ');

  end;

end.

2.

const N = 10;

var a: array [1..N] of integer;

i: integer;

begin

  a[1] := 1;

  a[2] := 1;

  for i := 3 to N do

  begin

      a[i] := a[i-1] + a[i-2];

  end;

  for i := 1 to N do

  begin

      write(a[i], ' ');

  end;

end.

3.

const N = 6;

var a: array [1..N] of integer;

i, x: integer;

begin

  a[N] := 1;

  for i := N-1 downto 1 do

  begin

      a[i] := 2 * a[i+1];

  end;

   

  for i := 1 to N do

  begin

      write(a[i], ' ');

  end;

end.

Объяснение:

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