М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
McGravii
McGravii
23.02.2023 10:54 •  Информатика

Тема : одномерный массив 1)составить текст программы 2)нарисовать блок схему дан массив из 15 чисел.определить номер максимального элемента в массиве,а также количество отрицательных чисел.

👇
Ответ:
aidanuraim
aidanuraim
23.02.2023

Ты не написала в чем решить ну я решу в паскале:

Program Frank;

const n=15;

Type mas=array[1..n] of integer;

var a:mas;max,i,k:integer;

begin

for i:=1 to n do begin

a[i]:=random(100)+5;

writeln(a[i]);

end;

max:=a[1];

for i:=1 to n do begin

if (a[i]>max) then max:=a[i]

end;

writeln('Максимальное число := ',max);

k:=0;

for i:=1 to n do begin

if a[i]<0 then k:=k+1

end;

writeln("Кол-во отрицательных чисел := ",k);

end.

 

 

4,6(56 оценок)
Ответ:
Leshik1997
Leshik1997
23.02.2023

Я так понимаю, что "номер максимального элемента" это на самом деле индекс.(иначе было бы написано "значение максимального элемента") Не забываем, что индексация массива ничинается с нуля.

 

#include <iostream>
using std::cout;
using std::endl;
#include <cstdlib>
using std::rand;
using std::srand;
#include <ctime>
using std::time;

int main()
{
    int a[15];
    int largestIndex = 0, counter = 0;

    srand(time(0));

    for(int i = 0; i < 15; i++)
    {
        a[i] = rand() % 21 - 10;

        if(a[i] < 0)
        {
            counter++;
        }
        if(a[largestIndex] < a[i])
        {
            largestIndex = i;
        }

        cout << a[i] << ' ';
    }

    cout << "\nThe index of the largest number = " << largestIndex
        << "\nThe number of negative elements = " << counter << endl;

   return 0;
}

 

P.S. В другом ответе решение неверное.


Тема : одномерный массив 1)составить текст программы 2)нарисовать блок схему дан массив из 15 чисел.
4,7(88 оценок)
Открыть все ответы
Ответ:
nuk890
nuk890
23.02.2023

1.

использовать Робот

алг 3 полоски

нач

нц пока снизу стена

закрасить

влево

кц

нц пока снизу свободно

влево

кц

нц пока слева свободно

закрасить

влево

кц

закрасить

нц пока слева стена

закрасить

вверх

кц

нц пока слева свободно

вверх

кц

нц пока слева стена

закрасить

вверх

кц

кон

2.

использовать Робот

алг

нач

нц пока сверху стена

закрасить

влево

кц

нц пока сверху свободно

влево

кц

нц пока слева свободно

закрасить

влево

кц

закрасить

нц пока слева стена

закрасить

вниз

кц

нц пока слева свободно

вниз

кц

нц пока слева стена

закрасить

вниз

кц

кон

3.

использовать Робот

алг

нач

нц пока слева стена

вверх

кц

влево

вниз

нц пока справа стена

закрасить

вниз

кц

нц пока справа свободно

вправо

кц

нц пока справа стена

закрасить

вниз

кц

кон

4.

использовать Робот

алг

нач

нц пока сверху стена

вправо

кц

вверх

нц пока слева стена

вверх

кц

влево

вниз

нц пока справа стена

вниз

кц

нц пока слева свободно

закрасить

влево

кц

кон

Объяснение: лишние циклы добавлены в случае изменений условия, а именно разной длины стенок и пропастей

4,6(84 оценок)
Ответ:
aaaa1111111111
aaaa1111111111
23.02.2023

Адекватная версия:

PascalABC.NET

begin

 var expr := Readstring();

 expr.Split(' ')[0].Println;

end.

Версия "Нас так учили"

var  

expression: string;

s_index: byte;

begin

 s_index := 1;

 readln(expression);

 while expression[s_index] <> ' ' do begin

   write(expression[s_index]);

   s_index := s_index + 1;

 end;  

 

end.

Объяснение:

Т.к по условию слово - последовательность непробельных символов, ограниченная пробелами или концами строки, то данная программа полностью игнорирует пунктуацию и считает любой символ частью того слова, с которым он не разделён пробелом.

4,8(53 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ