Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Arina2008egor
06.03.2020 05:11 •
Информатика
Составить программу вычисления стоимости восьми книг, если одна книга стоит 100 рублей, а каждая следующая дороже предыдущей на 7 рублей.(на языке паскаля)
Ответ:
228УЕБАН228
01.10.2020 21:04
a:=100;
i:=0;
while i<8 then
begin
s:=s+a;
a:=a+7;
inc(i);
end;
0,0
(0 оценок)
Популярные вопросы: Информатика
sxxaaa
21.11.2022 12:03
16. в числе, записанном в римской системе счисления, поменяли местами вторую и третью, четвертую и пятую от начала цифры, а затем перевели результат в десятичную систему счисления....
black95
16.11.2022 16:19
Книга, набранная с компьютера, содержит 100 страниц по 300 символов. какой объём информации в книге? и дано тоже...
Даша0109
10.06.2021 20:07
Что такое язык программирования?2. Какие существуют виды языков программирования?3. Объясните разницу между низкоуровневыми и высокоуровневыми языками программирования. 4. Что такое...
Rondov
14.03.2022 05:19
Сфера мен шар екі түрлі фигура ма?...
tiomashash
17.03.2023 05:47
Екі ұғым не себепті бірге айтылады?...
mileenkaaa
18.03.2020 05:38
Почему водемассой 30кг свободно держится на воде в надувных нарукавниках,объем которых всего лишь 1,5 дм3?...
oriano
22.02.2023 06:49
Движение за отмену рабства в сша лидером которого был д браун получило название: ...
amir161
18.03.2020 05:38
Свинцовые мерзости дикой жизни ! сочинение с примерами из текста (детство)...
valeriuadobro20
26.03.2022 19:08
Влияние техногенных катастроф на окружающую среду...
DanaФайн
23.03.2021 12:29
С1. напишите небольшой рассказ на тему: «җәй- яраткан ел фасылы . на татарском...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a:=100;
i:=0;
while i<8 then
begin
s:=s+a;
a:=a+7;
inc(i);
end;