Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Кошка022
21.09.2022 21:40 •
Информатика
Склавиатуры вводятя числа, пока не будет введено делящееся на 5, посчитать сумму тех из них, которые больше 10
Ответ:
запахи
10.10.2020 01:17
(pascal)
var a,b:integer
begin
while a<>5 do
begin
read(a);
if a>10 then b:b+a;
end;
write(b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
aguanapfel
04.06.2022 14:31
Людии получить массив в путем преобразования элементов массива а все положительные элементы массива а увеличить на 4.561...
vanya199jj
10.07.2020 22:02
с формулой в Excel В первую ячейку второго столбца ввести формулу для вычисления х0 по формуле х0 = s 2 mod и, например =ОСТАТ(В4^2;$В$3)...
сергей4995258
15.04.2023 17:27
Найти разность двух чисел 1674 и 786 в десятеричной системе. ответ дать в десятичной системе...
Daniil3037
13.03.2021 18:47
Напишите математическое выражение на языке Питон...
Александра123451111
07.06.2021 09:05
Как проверить в слове учительница букву вторую букву и...
nigina8807
07.06.2021 09:05
Скорый поезд проходит расстояние 360 км. на 3 часа быстрее, чем товарный. найдите скорость каждого их них, если товарный поезд проходит за 1ч на 20 км меньше, чем скорый за это же...
Thandey
07.06.2021 09:05
На мебельном фабрике изготовили 145 шкафов ,столов на 176 больше ,а тумбочек на 58 меньше ,чем столов, на сколько больше изготовили тумбочек чем шкафов ?...
вета18С
07.06.2021 09:05
1)в магазине было несколько десятков метров ткани. после того как 10 м тrани продали,осталось 40м . сколько метров ткани было в магазине? 2)в магазине было 50м танки.после того как...
Anjica
07.06.2021 09:05
Для построения графика функций у=-3х-1...
nikitinallllll
07.06.2021 09:05
Мне нужна щ это твёрдый или мягкий звук...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
(pascal)
var a,b:integer
begin
while a<>5 do
begin
read(a);
if a>10 then b:b+a;
end;
write(b);
end.