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

Опишите на одном из языков программирования алгоритм подсчета суммы элементов, стоящих на четных местах, в массиве из 30 чисел.

👇
Ответ:
devochkaSlava
devochkaSlava
29.04.2023
#include<iostream>
using namespace std; 
int main()
{
  int sum=0, mas[30];

  for(int i=1; i<=30; i++) //инициализируем массив значениями от 1 до 30
    mas[i] = i;

  for(int i=2; i<32; i+=2) // алгоритм подсчета сумы элементов массива
    sum+=mas[i]; // суммируем значения массива находящихся на четных местах
                            // записываем их в переменную sum
  cout << sum;
}
4,6(38 оценок)
Открыть все ответы
Ответ:
alapova1
alapova1
29.04.2023

Прочитать четверостишие

Воспроизвести четверостишие в памяти

Рассказать четверостишие без единой ошибки

Объяснение:

Начало

Выполняется действие Прочитать четверостишие.

Затем, выполняется действие Воспроизвести четверостишие в памяти.

Затем, проверяется условие Рассказать четверостишие без единой ошибки.

Если условие верно (Руслан рассказал четверостишие без единой ошибки) цикл закончился. Если нет, то цикл идёт заново

(Выполняется действие Прочитать четверостишие.

Затем, выполняется действие Воспроизвести четверостишие в памяти.

Затем, проверяется условие Рассказать четверостишие без единой ошибки.

Если условие верно (Руслан рассказал четверостишие без единой ошибки) цикл закончился.)

Так будет по кругу, пока Руслан не расскажет четверостишие без единой ошибки.

4,4(85 оценок)
Ответ:
katya6913
katya6913
29.04.2023
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

function MaxSubstr(s1,s2:string):string;
begin
  var a:=new integer[s1.Length+1,s2.Length+1];
  var u:=0; var v:=0;
  for var i:=0 to s1.Length-1 do
    for var j:=0 to s2.Length-1 do
      if s1[i+1]=s2[j+1] then begin
        a[i+1,j+1]:=a[i,j]+1;
        if a[i+1,j+1]>a[u,v] then begin u:=i+1; v:=j+1 end
        end;
  Result:=s1.Substring(u-a[u,v],a[u,v])
end;

begin
  var s:='trapperkaperkatrter';
  var t:='appekaperspamer';
  Writeln(MaxSubstr(s,t))
end.
4,5(63 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ