Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
3344227p06s57
16.03.2022 20:34 •
Информатика
Напишите программу, которая вводит натуральное число n и нахо дит сумму всех натуральных чисел от 1 до n. используй цикл с предусловием
Показать ответ
Ответ:
daryamoskovskay
03.08.2020 13:21
Program z1;
var a,n,i,sum:integer;
Begin
sum:=0;
read(n);
for i:=1 to n do
begin
read(a);
sum:=sum+a;
end;
writeln(sum);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
artem16021artemka16
11.08.2022 03:09
Складіть програму , яка задане число перетворює на число записане навпаки. Наприклад при введенні числа 123 отримуємо 321 ....
лолл18
07.09.2020 04:49
В чём заключается автоматическая нумерация элементов списка?...
Josoy
07.01.2021 23:28
По информатике . у васи есть доступ к интернет по высокоскоростному одностороннему радиоканалу, обеспечивающему скорость получения им информации 256 кбит в секунду. у пети нет скоростного...
ВаЛеРа06
20.03.2022 08:07
Цели и правового регулирования в области информационных ресурсов. можно кратко. ничего просто не могу найти....
vlada051199
18.08.2020 04:21
Записи числа в системе счисления ...
askarovavikuly
27.03.2022 01:33
Введите с клавиатуры построчно в двумерный массив числовую матрицу размером 4х4. разверните её по столбцам в одномерный массив. запишите массив в текстовый файл....
folaelena1
19.10.2022 15:13
Программирование линейных алгоритмов. : дано натуральное число меньше 256.возвести его в квадрат....
magasaidov
09.06.2020 22:39
Определите значения переменной s после выполнения фрагмента алгоритма: С решением а) s:= 0; m:=6: for i:=3 to m do s:=s+i; б) s:= 0; m:=5: for i:=2 to m do s:=s+i; в) s:=0; i:=5;...
s1453849
22.04.2021 15:53
Информатика 5 класс Выделение группы файлов....
269069
26.05.2021 00:30
Вычислить произведение a=2*4*6*8*10 используя оператор...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,n,i,sum:integer;
Begin
sum:=0;
read(n);
for i:=1 to n do
begin
read(a);
sum:=sum+a;
end;
writeln(sum);
End.