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

По данному натуральному n≥2 вычислите сумму 1×2+2×3+...+(n-1)×n. ответ выведите в виде вычисленного выражение и его значения в точности, как показано в примере. Для питона решение

👇
Открыть все ответы
Ответ:
Cookiemi2017
Cookiemi2017
29.05.2022

Выбор будущей профессии — это очень важный шаг в жизни каждого человека. Некоторые выпускники школ долго сомневаются, так как им трудно определиться, другие же наоборот принимают твердое решение раньше. Для того чтобы стать тем, кем хочешь нужно сначала выучиться и получить образование. Если будущая профессия очень нравиться тогда и учиться будет интересно и не трудно.

Что касается меня, то я хочу стать программистом. Эта профессия привлекла меня, когда я учился в младших классах. Тогда мы начали изучать информатику, которая стала моим любимым предметом. Я всегда очень внимательно слушаю учительницу. Мне интересны абсолютно все темы по этому предмету, поэтому я часто задаю много дополнительных вопросов на уроках. Дома у меня есть много разных книг: о строении компьютера, о работе с разными программами, об основах программирования, о поломках, о вирусах и другие. Кроме того, я обычно читаю дополнительную литературу по информатике в нашей школьной библиотеке или ищу интересующую меня информацию в интернете.

4,5(38 оценок)
Ответ:
Двоищник234
Двоищник234
29.05.2022
1)
begin
  var s1:=ReadlnString('Текст:');
  Writeln('k = ',s1.Where(c->Pos(c,'01')>0).Count);
  var s2:=s1.Select(c->c='0'?'A':c).Select(c->c='1'?'M':c);
  s2.Println;
end.

Пример:
Текст: Текст с 1 и 0: 110+101=1011
k = 12
Текст с M и A: MMA+MAM=MAMM

2)
var s1,s2:string;
i,k:integer;
begin
writeln('Введите текст:');
readln(s1);
k:=0;
s2:='';
for i:=1 to length(s1) do
 if s1[i]='0'
  then begin s2:=s2+'A'; k:=k+1; end
  else if s1[i]='1' then begin s2:=s2+'M'; k:=k+1; end else s2:=s2+s1[i];
writeln(s2);
writeln('k = ',k);
end.

Пример:
Введите текст:
Текст с 1 и 0: 110+101=1011
Текст с M и A: MMA+MAM=MAMM
k = 12
4,5(50 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ