Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ZMelnikSasha
13.06.2020 00:02 •
Информатика
(язык паскаль) вычислите сумму чисел вводимых с клавиатуры, окончание ввода число 0.
Показать ответ
Ответ:
Fan111111
06.10.2020 03:05
Var k,sum: real;
begin
read(n);
for var i:=1 to n do
begin
read(k);
sum:=sum+k;
end;
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
pervushina245
10.01.2020 20:54
Василий Котов разработал в 2016 году программу для персонального компьютера SuperKot. Запишите, как правильно он должен обозначать в тексте программы своё авторское право(знак...
viktoriakeda
07.11.2020 06:56
Изображение имеет размер 128х64,оно создано в палитре состоящей из 128 цветов. какое количество информации занимает данное изображения?...
opd23
07.12.2020 09:44
напишите программу которая запрашивает имя пользователя и его возраст. Программа должна вывести на экран сообщение. Python...
aculkow2017
18.04.2021 09:38
4. Установи соответствие между операторами присваивания и значениями переменной Z: ...
GameOverYouTube
20.04.2023 22:12
Домашнее заданиеСоставьте несколько линейных алгоритмов....
kaznacheev27p070e2
21.03.2022 09:52
Написать программу нахождения суммы чисел от 1 до n.для pascal abc...
ulozerova
05.01.2020 01:37
Составте блок-схему и программу для нахождения среднего арифметического всех натуральных двузначных чисел, кратных 2, в программе- построение блок схем, используя циклический...
Ирина29403
12.02.2022 18:56
Сколько раз выполняется тело цикла? for k: = 2to 7 do write ответы: 5, 6,7,9...
Ynushkevich333
29.04.2022 07:19
Помилку в написанні прикметникового суфікса допущено у рядкуА лицевий, вишневий, взірцевийБ глянцевий, аличевий, плечовийВ алюмінієвий, душовий, вишневийГ дощовий, дієвий,...
ksunavolik
29.04.2022 07:19
Есть ли место в биосфере без сукцессии? Объясните свой ответ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
read(n);
for var i:=1 to n do
begin
read(k);
sum:=sum+k;
end;
writeln(sum);
end.