Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Pyc52141
31.03.2020 07:57 •
Информатика
Составьте программу вычисления суммы всех двузначных чисел паскаль через while
Ответ:
nosorpg02
07.10.2020 22:32
var
a,s: integer;
begin
a:=10;
while a<=99 do begin
s:=s+a;
a+=1;
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
visokon1111
09.02.2021 00:25
Пусть задан массив из 20 элементов, содержащию информацию о 20 участниц конкурса красоты ( точнее, количество набранных ими очков). Призы выдаются обычно следующим образом:...
Леголаска
11.04.2021 05:34
Информатика 8 класс. Всего задача. Фото прикрепила...
keksikgovad
24.07.2020 08:50
Дан одномерный массив. запиши верный ответ...
Egor222222222
31.08.2021 21:50
Система компьютеров, связанных каналами передачи информации - это......
PRO11116
13.08.2020 08:23
Написать сочинение на казахском қыс киім...
VikaPoluyan
13.08.2020 08:23
Што токое дробь как раздилить дробь на целое число...
kopechenkina
13.08.2020 08:23
Стоимость тетради 32 рубля через месяц увеличилась на 5 процентов сколько рублей стала стоить после увелечения цены...
lera1066
13.08.2020 08:23
Составить предложения с причастным оборотомпро животное ( гиена) 5 предложений...
ЛаймовыйКотик00
13.08.2020 08:23
5различных чисел таковы, что сумма трех наименьших равна 10, трех наибольших - 23, а сумма наименьшего, наибольшего и среднего равна 18.чему равна суммы трех средних по...
спеш
13.08.2020 08:23
Записать слово двор дым сеть вкус луна клен звуками...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
a,s: integer;
begin
a:=10;
while a<=99 do begin
s:=s+a;
a+=1;
end;
writeln(s);
end.