Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Жибек20041
18.02.2020 13:18 •
Информатика
Составить программу вычисления стоимости восьми книг, если одна книга стоит 100 рублей, а каждая следующая дороже предыдущей на 7 рублей.(на языке паскаля)
Показать ответ
Ответ:
Fowlerok
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 оценок)
Популярные вопросы: Информатика
vichka20042018
04.12.2021 01:02
Напишите программу которая вводит натуральные числа a и b и выводит все простые числа в диапазоне от a до b...
Danil3250
08.02.2023 11:33
A: =1 b: =1 c: =0 для i: =1 до 9 шаг k=3 нц b=-b c=c+a*i a=a+b кц нарисовать блок схему и определить какое значение примет переменные a b c...
ПОРНОООСЕКС
28.01.2021 23:50
Сделайте это прям на фотке ...
Элина1111111111112
27.11.2022 05:39
Делать нужно в программу python Даны действительные числа a1,a2,...an. Поменять местами наибольший и наименьший элементы. В фото приложено, что я пыталась делать, но не совсем получается,...
нпапоащвщц
30.01.2021 18:44
Переведите число из десятичной системы в системы с основанием 2,8,16 число 122 !...
Polinaqqq
19.01.2023 07:05
Выразите в квадратных метрах 10000см=?...
kristinka127
19.01.2023 07:05
Пешеход треть всего пути двигался со скоростью 1 м/с, а оставшуюся часть пути со скоростью 2,5 м/с. определите среднюю скорость пешехода....
tambovtsevanat
19.01.2023 07:05
Вставьте пропущенные буквы. , , , , , , , , скатерть, ̆, , , в учебе, нувшие дни, ̆, , , , , ̆....
Иван55551
19.01.2023 07:05
Уравнять методом электрического . cl2+naoh- naocl+nacl+h2o...
Clime
19.01.2023 07:05
Разместите в порядке возрастания -8,6 ; 26/3 ; 8,66 ; |-8,3|...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a:=100;
i:=0;
while i<8 then
begin
s:=s+a;
a:=a+7;
inc(i);
end;