Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kristina25l
01.05.2023 06:34 •
Информатика
Найти сумму цифр от 300 до 500. это надо сделать в программе паскаль. напишите .
Показать ответ
Ответ:
Baby1FNAF
01.10.2020 17:11
ответ выкладываю файлом
0,0
(0 оценок)
Ответ:
shaduraalya
01.10.2020 17:11
Var sot,des,ed,k,summa :integer;
begin
for k:=300 to 500 do
begin
sot:=k div 100;
des:=k mod 100;
des:=des div 10;
ed:=k mod 10;
summa:=summa+(sot+des+ed);
end;
writeln(summa);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kiznijmaksimowbvhl
30.03.2020 10:19
Во сколько раз уменшается информационный обьем текста из 120 символов при его преобразовании из 16 битной кодировки в 1 битную кодировку.ответ обосновать....
bogdan975
06.06.2020 10:30
9 класс Информатика ...
natalyakulesch
17.05.2022 13:57
Составить алгоритм управления Чертёжником, в результате которого на координатной плоскости будет нарисован Квадрат, длина стороны которого равна 8 единицам...
viktoriadog
23.09.2021 03:22
Скорость передачи данных по некоторому каналу связи равна 256 000 бит/c. передача данных через это соединение заняла 2 минуты. определите информационный объём данных...
elyakiselya17
28.12.2022 01:15
1) Выберите формулы, которые являются элементарными дизъюнкциями: В ∨ А С → В ∨ А ¬С ∨ В ∨ А ¬С ∨ ¬В ∨ ¬А А ∨ В & С 2) Выберите формулу, которая является элементарной...
яблоко50
11.12.2022 16:27
Как создать новую переменную и Scratch 2?...
vbvb2006
07.05.2023 23:55
Со стола взяли 8 тетрадей в клетку и 9 в линейку. На сколько меньше тетрадей стало на столе?...
obuhovasveta
07.05.2023 23:55
В комнате 7 рядов стульев, по 8 стульев в каждом ряду. Сколько стульев будет в комнате, если: 1) вынести все стулья одного ряда;...
настя7598
07.05.2023 23:55
Масса одного ящика яблок 8 кг. Чему равна масса двух таких же ящиков? пяти ящиков?...
Mezhanova16
07.05.2023 23:55
Купили 4 пакета стирального порошка для ручной стирки и столько же пакетов стирального порошка для машинной стирки. Какова масса купленного порошка,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
for k:=300 to 500 do
begin
sot:=k div 100;
des:=k mod 100;
des:=des div 10;
ed:=k mod 10;
summa:=summa+(sot+des+ed);
end;
writeln(summa);
end.