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

В систему КуМир запустите исполнителя Кузнечик Изучите среду исполнителя и его систему команд (СКИ) Продумайте команды с которых Кузнечик перекрасит квадратики над числами1 2и3 с пульта. Организуйте работу кузнечика в непосредственном режиме

Показать ответ
Ответ:
miha115
miha115
23.06.2021 14:04

С++


int iMin, iNum, iAmountOfNumbers;



//



std::cout << "Enter the amount of numbers : " << std::endl;


std::cin >> iAmountOfNumbers;


std::cout << "Enter the first number" << std::endl;


std::cin >> iMin;



// Первый член последовательности устанавливается как минимальное значение  

// Вводится число и сразу же сравнивается с минимальным


// Если вводимое число меньше минимального, то оно становится минимальным



do


{


 std::cout << "Enter the next number" << std::endl;


 std::cin >> iNum;


 if (iNum < iMin) iMin = iNum;


 iAmountOfNumbers--;


} while (iAmountOfNumbers > 1);


 

std::cout << "Min number : " << iMin << std::endl;

0,0(0 оценок)
Ответ:
vladkoblov02
vladkoblov02
26.04.2023 18:26

Program pr1;

uses crt;

var  

  n:byte; // Размерность массива

  i:byte; // Счетчик массива

  a:array[1..30] of real; // Массива чисел

  P:real; // Произведение чисел

Begin

  clrscr;

  write('Введите размерность массива: ');

  readln(n);

  writeln('Введите ',n,' элементов');

// Блок ввода

  for i:=1 to n do

     readln(a[i]);

// Блок вывода

  writeln('Исходный массив');

  for i:=1 to n do

     write(a[i]:6:1,' ');

     writeln;

     readln;

// Блок инициализации

  P:=1;

  for i:=1 to n do

     if(a[i]>P) then

        P:=P*a[i];    

  readln;

  writeln('P= ',P);

End.

Возможно я не так понял задание, но вот

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