Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Daina1115
17.07.2022 11:44 •
Информатика
Составить программу вычисления стоимости восьми книг, если одна книга стоит 100 рублей, а каждая следующая дороже предыдущей на 7 рублей.(на языке паскаля)
Ответ:
petyasmolin
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 оценок)
Популярные вопросы: Информатика
Сенси
14.09.2022 21:29
Составьте программу , которая рисует отрезок с координатами концов (100,,200), если введено число 1 , и рисует окружность с центром (200,100) и радиусом 50, если введено...
grimm330066Flippoo
14.09.2022 21:29
Вбазе данных хранятся записи о датах. каждая запись состоит из трех полей: год (число от 1 до 2100), месяц (число от 1 до 12), день месяца (число от 1 до 31). каждое...
биг8
18.05.2020 03:12
Реализовать в виде модуля набор подпрограмм для выполнения над обыкновенными дробями вида p /q (где р — целое число, q — натуральное число). вариант 1 в раздел реализации...
samikby
18.05.2020 03:12
Написать своё имя с 3х разных кодов...
zerg314
15.03.2021 12:33
Друзья, нужна в составлении программы на паскаль вводим строчку (буквы, цифры, пробелы) с клавиатуры и программа должна найти рядом стоящие символы одинаковые и заменить...
радмир1402
19.04.2020 14:41
Здравствуйте! На компьютере появилось такое окно ( фото экрана прикрепила ) что делать, подскажите...
Pikasso07
04.08.2021 13:08
Доведіть що кожний кут рівностороннього трикутника дорівнює 60 градусів....
Vladiko011
03.11.2022 18:34
Ребро куба дорівнює 0,4 дм. Знайдіть його об’єм. Виберіть одну відповідь:1,6 дм30,16 дм30,64 дм30,064 дм3...
Dashka250715
10.01.2020 13:14
с объяснением чётко и понятно номер 772...
nyamnov
21.12.2020 00:09
. Найдите значение выражения. (2²+1)(2⁴+1)(2⁸+1)(2¹⁶+1)-2³²....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a:=100;
i:=0;
while i<8 then
begin
s:=s+a;
a:=a+7;
inc(i);
end;