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

Сообщение на тему: бессознательное совершение информационных преступлений человека

Показать ответ
Ответ:
Dima7111
Dima7111
20.12.2020 16:55

n = int(input())

sum = 0

for i in range(n + 1):

sum += i

print(sum)

Объяснение:

Первая строчка считывает число n. Далее заводим переменную sum, в которой будет хранится ответ. Далее запускаем цикл по всем числам от 1 до n. Переменная i будет по очереди становиться каждым этим числом, поэтому на каждом шаге цикла прибавляем ее к ответу. (В коде написано n+1, потому что цикл останавливается, когда встречает число в скобках. То есть когда i станет n+1 цикл завершится). В конце выводим ответ - переменную sum

0,0(0 оценок)
Ответ:
Zvezba1111111
Zvezba1111111
04.03.2020 20:44

program spos;

uses crt;

var

numb:array [1..100] of byte; // для последовательности чисел

i,f:integer; //счетчик и переменная в качестве флага

begin

randomize;

f:=0;

for i:=1 to 100 do numb[i]:=random(101);// задает последовательность

for i:=1 to 100 do

begin

write(',',numb[i]); // вывод на экран последовательность(можно удалить)

if (numb[i]=77)then f:=1; // в случае удачной проверки f:=1, в противном останется 0

end;

if f=0 then writeln('Yes') else writeln('No');

end.

program spos;

uses crt;

var

numb:array [1..100] of byte; // для последовательности чисел

i,f:integer; //счетчик и переменная в качестве флага

begin

randomize;

f:=0;

for i:=1 to 100 do begin

numb[i]:=random(101);// задает последовательность

write(' ',numb[i]);//вывод на экран, можно удалить

end;

writeln;

i:=0;

repeat

i:=i+1;

if (numb[i]=77)then f:=1; // в случае удачной проверки f:=1, в противном останется 0

until i<100;

if f=0 then writeln('Yes') else writeln('No');

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота