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

(pascal)составить программу, которая определяет встречаются ли в значении строковой величины два подряд идущих одинаковых символа

👇
Ответ:
SvetlanaSagina
SvetlanaSagina
24.02.2021
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('->');
  var c:=s[1];
  for var i:=2 to s.Length do
    if s[i]=c then begin Writeln(c,' - повторяющийся символ'); exit end
    else c:=s[i];
  Writeln('Повторяющихся символов нет')
end.

Пример
-> переезд
е - повторяющийся символ
4,4(69 оценок)
Открыть все ответы
Ответ:
domiradps
domiradps
24.02.2021

На языке C++ будет так:

#include <iostream>

#include <math.h>

using namespace std;

int main()

{

   int a,b,c;

   double D, x1, x2;

   cout<<"Введите a"<<endl;

   cin >>a;

   cout<<"Введите b"<<endl;

   cin >>b;

   cout<<"Введите c"<<endl;

   cin >>c;

   if (a == 0){

       cout<<"Коэффициент a не может быть равен 0"<<endl;

       return 0;

   }

   D = b*b - 4 * a * c;

   if (D >= 0){

       if (D == 0){

           x1 = -(double)b /(2*a);

           cout<<"x = "<<x1<<endl;

       }

       else{

           x1 = (-b + sqrt(D)) / (2*a);

           x2 = (-b - sqrt(D)) / (2*a);

           cout<<"x1 = "<<x1<<endl;

           cout<<"x2 = "<<x2<<endl;

       }

   }

   else{

       cout<<"Корней нет. D = "<<D<<endl;

   }

   return 0;

}

4,5(49 оценок)
Ответ:
Артём84748
Артём84748
24.02.2021

ответ: 0 3 6 6 8 10

Объяснение:

Дан цикл для i от 0 до 5 (от индекса первого элемента массива до индекса последнего), в котором следующее:

Если i>2, то присваиваем элементу массива под индексом i значение i*2.Иначе (т. е. если i≤2), присваиваем элементу массива под индексом i значение i*3.

В общем, можно сказать так: данный фрагмент программы заполняет массив A с индексами от 0 до 5 по следующему правилу: если индекс больше 2, то записывается индекс умноженный на 2, иначе — индекс умноженный на 3.

В таком случае:

A[0] = 0*3 = 0   (т. к. 0<2)A[1]  =  1*3 = 3   (т. к. 1<2)A[2] = 2*3 = 6   (т. к. 2=2)A[3] = 3*2 = 6   (т. к. 3>2)A[4] = 4*2 = 8   (т. к. 4>2)A[5] = 5*2 = 10 (т. к. 5>2)

Пример работы:


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