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

Реализован некоторый алгоритм в виде блок схемы (рис. 16). Найти А, В на выходе блок-схемы, если изначально:

Показать ответ
Ответ:
Ivan733822
Ivan733822
13.04.2021 19:32

1) От 10 до 14

2) random(1, 10); random(-10,10); random(50,100);

3)

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

   i, p, o:integer;

begin

 p := 0;

 o := 0;

 for i := 1 to 100 do

   a[i] := random(-20, 20);

 writeln(a);

 for i := 1 to 100 do begin

   if a[i] >= 0 then p := p + 1

   else o := o + 1;

 end;

 writeln('Положительных: ' + p);

 writeln('Отрицательных: ' + o);

end.

4)

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

   b:array[1..20] of integer;

   i:integer;

begin

 randomize;

 for i := 1 to 20 do

   begin

   a[i] := random(1, 5);

   b[i] := random(1, 5);

   end;

 for i := 1 to 20 do begin

   if a[i] = b[i] then begin

   writeln('Номер: ' + i);

   writeln('Значение: ' + a[i]);

   end;

 end;

end.

0,0(0 оценок)
Ответ:
KONERtm
KONERtm
25.12.2022 10:19
#include <iostream>
using namespace std;

int main() {
   int month, day;
   string a[13] = {"Kozerog","Vodoley","Ryby","Oven","Telec","Bliznecy",
       "Rak","Lev","Deva","Vesy","Skorpion","Strelec","Kozerog"};
   int mes[12] = {31,29,31,30,31,30,31,30,31,31,30,31};
   int bound[12] = {21,19,21,20,21,22,23,23,23,23,23,22};
   cout << "Programma opredeleniya znaka zodiaka" << endl;
   cout << "Vvedite mecyac: ";
   cin >> month;
   cout << "Vvedite den: ";
   cin >> day;
   if ((month<1 || month>12) || (day<1 || day>mes[month-1])) 
      cout<<"invalid input"<<endl;
   else {
         if (day<bound[month-1]) cout<<a[month-1]<<endl;
         else cout<<a[month]<<endl;
   }         
   system("pause");
   return 0;
}
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота