tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
20 надо составить прогламму, чтобы
20 надо составить прогламму, чтобы она складывала все числа, что ты вбиваешь на клавиатуре, кроме 0. если набьёшь 0 - чтоб она перестала складввать
СветаВета
1 20.07.2019 11:00
0
Ответы
voronkovid
30.08.2020 20:42
Только что решал такую задачу:
//Pascal
var a,s:integer;
begin
s:=0;
repeat
readln(a);
s:=s+a;
until a=0;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Erekcia
14.03.2021 21:40
❤️ Домашние задание Для следующих задач выполните: 1) Определить входные и выходные величины; 2) Записать словесный алгоритм; 3) Записать алгоритм в виде блок-схемы. Задача 1 Определите...
ммрк
14.03.2021 21:44
Торговый склад производит уценку хранящейся продукции. Если продукция хранится на складе дольше 10 месяцев, то она уценивается в 2 раза, а если срок хранения превышает 6 месяцев, но...
Vitas40
16.07.2019 01:30
Если от числа, равного номеру наступающего года, вычесть самое маленькое четырёхзначное число, а затем вычесть число, которое на 2 меньше, чем самое маленькое трёхзначное число, то...
Moontrick
16.07.2019 01:30
Какая решается по следующей программе? rrogram test; var a, b, c: integer; begin readln(a,b); c: =(a+b)*(b-a); writeln(с) end. какой результат будет получен, если в качестве исходных...
помогите1165
26.03.2020 23:19
Каковы возможности MS Word для проверки ошибок различного рода в текстовых документах? Каков порядок проверки орфографии и грамматики в MS Word? Для каких целей нужны функции автозамены...
мивое
26.03.2020 23:19
СДЕЛАЙТЕ ПРОГРАММУ НА ПАСКАЛЕ 17. заданы целые числа: k, l, n, m. проверить, является ли k делителем всех чисел. 19. заданы числа a, b, c. напечатать эти числа в порядке убывания их...
kasatka0556
23.07.2019 08:00
Решить ! мальчики решили купить мяч для игры в футбол и внесли на покупку мяча по 50 руб. оказалось, что собранная сумма на 150 руб. меньше стоимости мяча. когда же каждый из мальчиков...
ladysachenko20
27.05.2019 12:20
Нужна в составлении алгоритма (паскаль авс) -8 класс. 1 : составьте программу вычисления количества двухзначных чисел,которые кратны 2 и 3. 2 : составьте программу,выводящую на экран...
PooКякя
27.05.2019 12:20
Переведите число 13910 из десятичной системы счисления в двоичную.сколько единиц содержит полученное число?...
nuk5
07.10.2019 17:10
Решите уравнение х^4-2(а+8)х^2+32а=0...
Популярные вопросы
Какие функции выполняет надпочечники, поджелудочная железа и половые железа...
2
Из населенного пункта в противоположных направлениях выехали две грузовые машины...
2
Питання по північно-льодовитому океану: 1.ічний об*єкт з координатами 90 градусі...
1
Сколько среди выделенных букв слов-? (по)дула зима холодом,(со)рвала листья (с)лесов...
3
Шофёрам выдавалось оружие в великой отечественной войне?...
3
1)в чем,по вашешему заключается ирония а в чем юмор в рассказе. 2)образ современно...
2
Вэтом городе были построены корабли( апостол пётр ) и (апостол павел) новый город...
2
Вравнобедренном трапеции основания равны 8см и 10см соответственно и h=2см найти...
2
Поставь пропущенные гласные так чтобы получилось словарные слова спиши подчеркни...
1
Решил наиболия удобным зарание...
1
//Pascal
var a,s:integer;
begin
s:=0;
repeat
readln(a);
s:=s+a;
until a=0;
writeln(s);
end.