Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Mary200001313
21.06.2020 15:08 •
Информатика
Склавиатуры вводятся числа до первого отрицатеьного. нарисуйте блок схему и напишите программу для нахождения суммы этих чисел. pascal работа по теме (циклы) , самый большой
Показать ответ
Ответ:
5675431
03.08.2020 13:41
Var d, sum:integer;
begin
while d>-1 do
begin
sum:=sum+d;
readln(d);
end;
writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
val40
04.07.2020 17:34
Всем привет Я хочу скачать файл архивом rar а вместо книжки нарисовон браузер, фиг с ним но браузер сам фал не открывает если надо могу скрин сделать, я с винды 10...
vannyporchun
07.11.2021 13:00
Напишите на программе Паскаль :з...
mkashkan
25.02.2022 16:08
Решите номера с 77 по надо, заранее...
tfdr
16.06.2022 15:08
Составьте и запишите компьютерную программу на языке программирования паскаль для решения следующей : заполнить целочисленный массив 20-ю случайными элементами в диапазоне...
aselduishenova
16.06.2022 15:08
Написать программу нахождения корней квадратного уравнения на школьном алгоритмическом языке в кумире...
lilka23
16.06.2022 15:08
Кто силён в информатике(логическое отрицание) avb(обе переменные отрицательные)...
kapital0202p0cd2e
16.06.2022 15:08
Решить по инфе на языке паскаль найти значение выражения s=2k: 4 найти значение выражения ax+b=c...
нюра42
02.12.2020 04:05
50 за сколько единиц в двоичной записи числа (2^2018)−2018?...
sobkevichbozhep08t40
07.05.2020 16:48
40 за для передачи данных по каналу связи используется 5-битовый код. сообщение содержит только буквы о, р, н и в, которые кодируются следующими кодовыми словами:...
АВатар1765
03.09.2022 20:55
Сзаполнением таблицы я просто не разбираюсь в пк и вот дали дз и не понимаю как делать кому не сложно хелп...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
while d>-1 do
begin
sum:=sum+d;
readln(d);
end;
writeln(sum);
end.