Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ManemiDragnil
04.08.2020 13:52 •
Информатика
Составте программу вычисления суммы всех двузначных чисел.
Показать ответ
Ответ:
ilya1613
25.08.2020 09:53
Program summ;
var i: byte;
sum: integer;
begin
i := 10;
while i < 99 do
begin
sum := sum + i;
inc(i);
end;
write('Сумма всех 2-значных чисел: ',sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kashalotic20
17.07.2022 09:59
Укажите неправильные формулы =Если (А1=0,1,0) =Округл(5,45;0) =Целое (-5,85) =Сумм (истина;ложь) Срзнач (а1; а6)...
rudypal12p08ufl
18.12.2020 01:13
Как человек получает знание ? ответе...
anton20063
18.12.2020 01:13
Медузиха обезьяниха и бегимотиха рядом напиши слова суффикс-синоним имеющие такое же значение...
mullakaeva85
18.12.2020 01:13
Сравни числа а) -1,5 и - 1,05 б)-2,8 и 2,7 в)-3\4 и -2/3...
LumpySpacePrincess01
18.12.2020 01:13
Что оброзуется в результате разрушения горных пород: 1) холмы 2) овраги 3) глина...
pro100Abyroi
18.12.2020 01:13
Каких окончаний не бывает у сочетания слов штаб-квартира в разных падежах? а)-а,ы, ,...
kirillsokolov22
18.12.2020 01:13
1. известно что cos a=0,8 270градусов a 360градус найти sin a, tg a, ctg a 2. вычислите а) 2sin 60градус + ctg (-п/6) б) cos (-180 градусов +sin 90gradusov+tg(-180gradusov) в)...
FaceStoom
18.12.2020 01:13
Останется ли электрический нейтральный атом водорода потерявший электрон...
sonyaunicorn1
18.12.2020 01:13
Встает заря во мгле холодной ( кого рода холодной? )...
anna333666756756
18.12.2020 01:13
Выбери схему, которая подходит для данной , обведи её номер кружком. реши выражением. 1) в школьной библиотеке всего было 936 книг. из них 2\3 составляли рассказы и повести, а...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i: byte;
sum: integer;
begin
i := 10;
while i < 99 do
begin
sum := sum + i;
inc(i);
end;
write('Сумма всех 2-значных чисел: ',sum);
end.