Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
irinkacs
26.07.2020 01:21 •
Информатика
Написать программу вычисления суммы S=1+2+3+...+n. На паскале
Ответ:
saaangelina
11.10.2020 12:26
var
n,i,s:longint;
begin
read(n);
for i:=1 to n do
s:=s+i;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Winny1111
19.11.2022 07:39
Какая из регрессионных моделей наилучшим () образом описывает статистические данные? ответ введите >...
Ьала
09.11.2022 11:52
РЕШИТЕ ЗАДАЧУ НА С++ Макс, Владимир и Евгений принесли на новогодний стол коробки с соком. Вместе они принесли N коробок. Сколько коробок принес каждый из них, если известно,...
ЕгорКТ
28.10.2020 00:30
Какой пункт меню «Вставка» нужно выбрать, чтобы добавить на веб-страницу горизонтальный разделитель? ответ введите в числовой форме....
nosia
16.11.2020 05:07
Тут есть ошибка? Как это решить вообще?...
xerobiriv
29.01.2021 06:00
Как пользоваться равенством i=log2n мощность nалфавита=64 символов; 2i=64; информационный вес одного символа алфавита iсимв.=log264=6 бит . если информационный вес одного...
dmitriidimaro
05.07.2021 16:45
Решить числовой ребус (одинаковые буквы обозначают одинаковые цифры) удар+удар=драка...
twilightsun90
04.10.2020 01:28
Переведите в килобайты: 1) 1234 бит 2) 580 байт 3) 4564 мбайт....
natashashvachka
04.10.2020 01:28
Слово зашифровали переставив некоторые буквы.получилось йефнетиср. найти исходное слово...
ksenia7567012
02.04.2022 20:20
Приклади простого запиту ...
tanadzhi01
09.10.2020 13:05
Найди и запиши слова с непроверенными гласными и согласными в корне слова. подчеркни орфограммы. качалка, каникулы, месяц, мягкий, мигать, антенна, лестница, груздь, вокзал,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
n,i,s:longint;
begin
read(n);
for i:=1 to n do
s:=s+i;
writeln(s);
end.